Tanzania, August, 2019

Introduction to leaflet

Introduction to leaflet

What is leaflet?

  • open source JavaScript library used to build web mapping applications
  • Probably the world's premier web mapping system

Why leaflet?

  • Great way to explore datasets with geographic component
  • Communicate results with interactive maps using only a few lines of code
  • Integrates nicely with Rshiny producing powerful extra-interactive maps

Intro to leaflet

# insert fancy example leaflet map with several components
1 + 1
## [1] 2

Getting started with our map

leaflet() initialises a leaflet object m. Pipe this into addCircles() where we refer to the map_data dataframe and indicate which columns correspond to latitude and longitude.

m <- leaflet() %>%
  addCircles(data = map_data, lng = ~x, lat = ~y)
m 

Tiles

Tile give our data geographic context. addTiles() uses OpenStreetMap tiles, the default for leaflet

m %>% addTiles()

Using addProviderTiles()

Allows us to use third party tiles (e.g. Terrain tiles from Stamen Design).

# m created using code from previous slides
m <- leaflet() %>%
  addCircles(data=map_data, lng=~x, lat=~y)

Code options

addProviderTiles(map = m, provider = "Stamen.Terrain")

addProviderTiles(map = m, provider = providers$Stamen.Terrain)

m %>% addProviderTiles(provider = providers$Stamen.Terrain)

Using addProviderTiles()

m %>% addProviderTiles(providers$Stamen.Terrain)

Your turn 2.2a

Try some options for provider tiles.

Hint: Use tab completion with addProviderTiles(provideer = providers$) to access options

Using addProviderTiles()

m %>% addProviderTiles(providers$Esri.NatGeoWorldMap)

Using addProviderTiles()

m %>% addProviderTiles(providers$Wikimedia)

Using addProviderTiles()

m %>% addProviderTiles(providers$Esri.WorldTopoMap)

Using addProviderTiles()

m %>% addProviderTiles(providers$Esri.WorldImagery)

Using addProviderTiles()

m %>% addProviderTiles(providers$CartoDB.Positron)

More info on addProviderTiles()

Popups

An interactive way for the user to get more info on data points

Easier to first store what we want to display as an object popupInfo

popupInfo <- paste("Date: ", map_data$date, "<br>",
                   "Species: ", map_data$species, "<br>",
                   "Age: ", map_data$age, "<br>",
                   sep = " ")

m <- leaflet() %>% addProviderTiles(providers$CartoDB.Positron)

Then, refer to popupInfo when using addCircles(), addCircleMarkers() etc.

m %>% addCircles(data = map_data, lng = ~x, lat = ~y, popup = popupInfo)

Popups

An interactive way for the user to get more info on data points

m %>% addCircles(data = map_data, lng = ~x, lat = ~y, popup = popupInfo)

Popups and labels

Labels show up when hovered over, popups when the user clicks.

m %>% addCircles(data = map_data, lng = ~x, lat = ~y, popup = popupInfo,
                 label = ~species)

Circle markers

Circle markers (addCircleMarkers()) are similar to circles but radius in onscreen pixels is constant regardless of zoom level.

m %>% addCircleMarkers(data=map_data, lng=~x, lat=~y, popup = popupInfo, radius = 5,
                       stroke = T, weight = 3, color = "grey", opacity = 0.8,
                       fillColor = ifelse(map_data$species == "human",
                                          "firebrick", "dodgerblue"), fillOpacity = 0.7)

Circle markers

With, stroke = F, weight, color, and opacity are irrelevant. Can also use radius = to size circle markers by species.

m %>% addCircleMarkers(data = map_data, lng = ~x, lat = ~y, popup = popupInfo, stroke = F,
                       radius = ifelse(map_data$species == "human", 8, 4),
                       fillColor = ifelse(map_data$species == "human", "firebrick", "dodgerblue"),
                       fillOpacity = 0.8)

addMarkers

On a map with many markers, it might make sense to cluster them using clusterOptions = markerClusterOptions() shown here with the default options for markerClusterOptions().

m %>% addMarkers(data = map_data, lng = ~x, lat = ~y, label = ~species, popup = popupInfo)

addMarkers

On a map with many markers, it might make sense to cluster them using clusterOptions = markerClusterOptions() shown here with the default options for markerClusterOptions().

m %>% addMarkers(data = map_data, lng = ~x, lat = ~y, label = ~species, popup = popupInfo,
                 clusterOptions = markerClusterOptions())

Colour palettes in leaflet

Discrete variable - using colorFactor()

leaflet::colourFactor() creates a function (we're going to call it myPal) that is used as an argument when we use addCircles(), addCircleMarkers()etc.

# Choose 3 colours for our 3 groups  
colour_pal <- c("gold", "forestgreen", "cornflowerblue")
myPal <- colorFactor(palette = colour_pal,
                     domain = c("Human", "Domestic", "Wildlife"))

Create a fresh version of m before we add coloured circles

m <- leaflet() %>% 
  addProviderTiles(provider = providers$CartoDB.Positron)

Discrete variable - using colorFactor()

myPal() takes species type variable as argument

m <- m %>% addCircles(data=map_data, lng=~x, lat=~y, 
                      color = myPal(map_data$species_type),
                      opacity = 0.9, popup = popupInfo)
m

Adding a legend

m <-  m %>% addLegend(position = "topright", title = "Species<br>type", pal = myPal,
                      values = map_data$species_type, opacity = 0.9)
m

Your turn 2.2b

Adapt the code from previous slides to produce a map with:
1) tiles showing topography
2) circles coloured by species (instead of species type)
3) a colour legend
4) a scale bar showing distance in kilometers (hint: ?addScaleBar).

Previous code:

colour_pal <- c("gold", "forestgreen", "cornflowerblue")
myPal <- colorFactor(colour_pal, domain = c("Human", "Domestic", "Wildlife"))
m <- leaflet() %>%
  addProviderTiles(provider = providers$CartoDB.Positron) %>%
  addCircles(data = map_data, lng = ~x, lat = ~y,
             color = myPal(map_data$species_type), opacity = 0.9) %>%
  addLegend(position = "topright", title = "Species<br>type", pal = myPal,
            values = map_data$species_type, opacity = 0.9)
m

Solution 2.2b

Part 1) tiles showing topography

m <- leaflet() %>%
  addProviderTiles(provider = providers$OpenTopoMap)
m

Solution 2.2b

Part 2) circles coloured by species (instead of species type)

colour_pal <- c("gold", "forestgreen", "cornflowerblue", "red", "magenta")
myPal <- colorFactor(colour_pal, domain = unique(map_data$species))
m <- m %>% addCircles(data = map_data, lng = ~x, lat = ~y,
                      color = myPal(map_data$species), opacity = 0.9)
m

Solution 2.2b

Part 2) circles coloured by species (instead of species type)

myPal <- colorFactor("Set2", domain = unique(map_data$species))
m <- m %>% addCircles(data = map_data, lng = ~x, lat = ~y,
                      color = myPal(map_data$species), opacity = 0.9)
m

Solution 2.2b

Part 3) a colour legend

m <- m %>% addLegend(position = "topright", title = "Species", pal = myPal,
                     values = map_data$species, opacity = 0.9)
m

Solution 2.2b

Part 4) a scale bar showing distance in kilometers

m <- m %>% addScaleBar(position = "bottomleft",
                       options = scaleBarOptions(maxWidth = 200, # default = 100
                                                 imperial = FALSE))
m

Continuous variable - colour by date

First, need to convert date variable to a numeric value

head(map_data$date, 5)
## [1] "2014-01-01" "2014-01-01" "2014-01-02" "2014-01-03" "2014-01-04"
is.factor(map_data$date)
## [1] FALSE
# Use 2 functions from lubridate for conversion
map_data$date_decimal <- lubridate::decimal_date(lubridate::ymd(map_data$date))

Continuous variable - colour by date

date_decimal is now a numeric variable

# Use 2 functions from lubridate for conversion
map_data$date_decimal <- lubridate::decimal_date(lubridate::ymd(map_data$date))

head(map_data$date_decimal)
## [1] 2014.000 2014.000 2014.003 2014.005 2014.008 2014.014
is.numeric(map_data$date_decimal)
## [1] TRUE

Continuous variable - colour by date

Provide some colours and values of date to colorNumeric().

Either provide colours (palette = c("darkgreen", "green", "gold""))) or refer to a palette (palette = "Spectral").

dateRange <- c(2014, 2015)
myPal <- leaflet::colorNumeric(palette = "Spectral", domain = dateRange)

# new leaflet widget
m <- leaflet() %>% addProviderTiles(providers$CartoDB.Positron)

Continuous variable - colour by date

Add circles and a legend referring to myPal

m %>% addCircles(data = map_data, lng = ~x, lat = ~y,
                 color = myPal(map_data$date_decimal), opacity = 0.9) %>% 
  addLegend(position = "topright", title = "Date",
            pal = myPal, values = dateRange, opacity = 0.9,
            labFormat = labelFormat(big.mark = "")) # removes a comma from 2,014

Your turn 2.2c

Adapt the code from previous slides to produce a map with:
1) Circles coloured by population density using the viridis palette
2) and sized by population density (higher density = larger circles)
3) legend and scale bar

Previous code to adapt:

dateRange <- c(2014, 2015)
myPal <- colorNumeric(palette = "Spectral", domain = dateRange)
m <- leaflet() %>%
  addProviderTiles(provider = providers$CartoDB.Positron) %>%
  addCircles(data = map_data, lng = ~x, lat = ~y,
             color = myPal(map_data$date_decimal), opacity = 0.9) %>% 
  addLegend(position = "topright", title = "Date",
            pal = myPal, values = dateRange, opacity = 0.9,
            labFormat = labelFormat(big.mark = ""))
m

Solution 2.2c

densityRange <- c(0.1, 12000)
myPal <- colorNumeric(palette = "viridis", domain = log(densityRange))

m <- leaflet() %>%
  addProviderTiles(provider = providers$CartoDB.Positron) %>%
  addCircles(data = map_data, lng = ~x, lat = ~y,
             color = myPal(log(map_data$density)), opacity = 0.9) %>% 
  addLegend(position = "topright", title = "Human<br>density<br>(log)",
            pal = myPal, values = log(densityRange), opacity = 0.9,
            labFormat = labelFormat(big.mark = "")) %>% 
  addScaleBar(position = "bottomleft")
m

Continuous variable, discrete colour scale

myPal <- colorQuantile(palette = "viridis", domain = map_data$density)

leaflet() %>%
  addProviderTiles(provider = providers$CartoDB.Positron) %>%
  addCircles(data = map_data, lng = ~x, lat = ~y, radius = 10,
             color = myPal(map_data$density), opacity = 0.9) %>% 
  addLegend(position = "topright", title = "Human<br>density",
            pal = myPal, values = map_data$density, opacity = 0.9,
            labFormat = labelFormat(big.mark = ""))

Using leaflet and shape file data

Shape file data

Load shape data and look at the structure

region_shp <- rgdal::readOGR(dsn = "data/TZ_Region_2012_density")
## OGR data source with driver: ESRI Shapefile 
## Source: "/Users/wharvey/Documents/git/ShinyCourse/Day 2/slides/data/TZ_Region_2012_density", layer: "TZ_Region_2012.density"
## with 30 features
## It has 4 fields
head(region_shp)
## An object of class "SpatialPolygonsDataFrame"
## Slot "data":
##      Region_Nam               Loc_ID Loc_type    density
## 0         Tanga         Region-Tanga   Region  150.13810
## 1        Tabora        Region-Tabora   Region   94.02598
## 2  Kusini Pemba  Region-Kusini Pemba   Region  770.20632
## 3          Mara          Region-Mara   Region 1002.31128
## 4       Manyara       Region-Manyara   Region  388.34348
## 5 Kusini Unguja Region-Kusini Unguja   Region  259.94865
## 
## Slot "polygons":
## [[1]]
## An object of class "Polygons"
## Slot "Polygons":
## [[1]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 38.276477 -5.217057
## 
## Slot "area":
## [1] 2.275229
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##            [,1]      [,2]
##   [1,] 38.79584 -5.962273
##   [2,] 38.79085 -5.966766
##   [3,] 38.75925 -5.953226
##   [4,] 38.73037 -5.953226
##   [5,] 38.70474 -5.945994
##   [6,] 38.69493 -5.961519
##   [7,] 38.68901 -5.961097
##   [8,] 38.66993 -5.951635
##   [9,] 38.65506 -5.954343
##  [10,] 38.64301 -5.966209
##  [11,] 38.64212 -5.975246
##  [12,] 38.62467 -5.986490
##  [13,] 38.60746 -5.980221
##  [14,] 38.59627 -5.981297
##  [15,] 38.59628 -5.987921
##  [16,] 38.59004 -5.995619
##  [17,] 38.57907 -5.999053
##  [18,] 38.56173 -6.015714
##  [19,] 38.55362 -6.012847
##  [20,] 38.55719 -6.000735
##  [21,] 38.54945 -6.001811
##  [22,] 38.54144 -5.997303
##  [23,] 38.53499 -6.003628
##  [24,] 38.51675 -6.007845
##  [25,] 38.48736 -5.999173
##  [26,] 38.47908 -6.001138
##  [27,] 38.47756 -6.008812
##  [28,] 38.47123 -6.010938
##  [29,] 38.46991 -6.017940
##  [30,] 38.46140 -6.018723
##  [31,] 38.44807 -6.008133
##  [32,] 38.43041 -6.014513
##  [33,] 38.41987 -6.007337
##  [34,] 38.41584 -5.994451
##  [35,] 38.40819 -5.982511
##  [36,] 38.39636 -5.980656
##  [37,] 38.39404 -5.989119
##  [38,] 38.36541 -5.983091
##  [39,] 38.34073 -5.986568
##  [40,] 38.34339 -5.974281
##  [41,] 38.33168 -5.965007
##  [42,] 38.33528 -5.951791
##  [43,] 38.32369 -5.944836
##  [44,] 38.31754 -5.934055
##  [45,] 38.30387 -5.935794
##  [46,] 38.29807 -5.926752
##  [47,] 38.28746 -5.930551
##  [48,] 38.28565 -5.925426
##  [49,] 38.27025 -5.930124
##  [50,] 38.25810 -5.926469
##  [51,] 38.24504 -5.928375
##  [52,] 38.24184 -5.923734
##  [53,] 38.22567 -5.914767
##  [54,] 38.22427 -5.903577
##  [55,] 38.21781 -5.900502
##  [56,] 38.20644 -5.889740
##  [57,] 38.20490 -5.879593
##  [58,] 38.19967 -5.874366
##  [59,] 38.17938 -5.872828
##  [60,] 38.17323 -5.862066
##  [61,] 38.15257 -5.854597
##  [62,] 38.14104 -5.853828
##  [63,] 38.12823 -5.860490
##  [64,] 38.11542 -5.861259
##  [65,] 38.10697 -5.854853
##  [66,] 38.10005 -5.861002
##  [67,] 38.08109 -5.854341
##  [68,] 38.07315 -5.847679
##  [69,] 38.05752 -5.863308
##  [70,] 38.03036 -5.858953
##  [71,] 38.02293 -5.863308
##  [72,] 38.01474 -5.858953
##  [73,] 38.00679 -5.860234
##  [74,] 38.00500 -5.868689
##  [75,] 37.99783 -5.872789
##  [76,] 37.98963 -5.858696
##  [77,] 37.97041 -5.848191
##  [78,] 37.96017 -5.851010
##  [79,] 37.94736 -5.848960
##  [80,] 37.94428 -5.843066
##  [81,] 37.92609 -5.842810
##  [82,] 37.91713 -5.848703
##  [83,] 37.90829 -5.864205
##  [84,] 37.89906 -5.872063
##  [85,] 37.88882 -5.871721
##  [86,] 37.87993 -5.876162
##  [87,] 37.86525 -5.891877
##  [88,] 37.84987 -5.888461
##  [89,] 37.83723 -5.888119
##  [90,] 37.81913 -5.884020
##  [91,] 37.79975 -5.891914
##  [92,] 37.79292 -5.890657
##  [93,] 37.78794 -5.895956
##  [94,] 37.77668 -5.893480
##  [95,] 37.77028 -5.886653
##  [96,] 37.75443 -5.888554
##  [97,] 37.75522 -5.877906
##  [98,] 37.75233 -5.872865
##  [99,] 37.73559 -5.872905
## [100,] 37.72884 -5.875601
## [101,] 37.71656 -5.869370
## [102,] 37.71015 -5.876324
## [103,] 37.70549 -5.890269
## [104,] 37.69847 -5.895385
## [105,] 37.68880 -5.913271
## [106,] 37.66522 -5.934685
## [107,] 37.64060 -5.948974
## [108,] 37.63349 -5.949270
## [109,] 37.63060 -5.933553
## [110,] 37.63232 -5.913240
## [111,] 37.62657 -5.912388
## [112,] 37.62105 -5.903891
## [113,] 37.61155 -5.898631
## [114,] 37.61151 -5.870563
## [115,] 37.60826 -5.856166
## [116,] 37.58975 -5.850648
## [117,] 37.57932 -5.838400
## [118,] 37.57419 -5.836457
## [119,] 37.56418 -5.841716
## [120,] 37.55336 -5.821287
## [121,] 37.54477 -5.815568
## [122,] 37.53440 -5.818808
## [123,] 37.52201 -5.818368
## [124,] 37.50626 -5.821185
## [125,] 37.50253 -5.815457
## [126,] 37.49119 -5.815672
## [127,] 37.48784 -5.824685
## [128,] 37.47973 -5.820306
## [129,] 37.47845 -5.809993
## [130,] 37.46787 -5.808367
## [131,] 37.46007 -5.800069
## [132,] 37.45397 -5.803102
## [133,] 37.44192 -5.802392
## [134,] 37.41690 -5.828133
## [135,] 37.40837 -5.843628
## [136,] 37.39905 -5.853811
## [137,] 37.39486 -5.863356
## [138,] 37.39253 -5.881487
## [139,] 37.39373 -5.894440
## [140,] 37.38935 -5.902811
## [141,] 37.39447 -5.928515
## [142,] 37.39146 -5.941036
## [143,] 37.37603 -5.965148
## [144,] 37.36099 -5.975335
## [145,] 37.34541 -5.974557
## [146,] 37.32746 -5.981498
## [147,] 37.30244 -5.979146
## [148,] 37.28999 -5.989759
## [149,] 37.27595 -5.989726
## [150,] 37.26880 -5.994789
## [151,] 37.24659 -5.993397
## [152,] 37.23289 -6.000076
## [153,] 37.19193 -5.999139
## [154,] 37.17537 -6.000518
## [155,] 37.15388 -5.990867
## [156,] 37.14768 -5.990333
## [157,] 37.12732 -5.966882
## [158,] 37.12252 -5.959508
## [159,] 37.09851 -5.908961
## [160,] 37.09058 -5.894361
## [161,] 37.07366 -5.858419
## [162,] 37.07102 -5.862148
## [163,] 37.02389 -5.894521
## [164,] 37.02699 -5.886102
## [165,] 37.01974 -5.878506
## [166,] 37.02728 -5.872364
## [167,] 37.03348 -5.860890
## [168,] 37.03657 -5.847443
## [169,] 37.04351 -5.841058
## [170,] 37.05007 -5.827823
## [171,] 37.06125 -5.823712
## [172,] 37.08022 -5.797669
## [173,] 37.08568 -5.786407
## [174,] 37.09923 -5.777239
## [175,] 37.10264 -5.768593
## [176,] 37.11630 -5.771520
## [177,] 37.12842 -5.758707
## [178,] 37.14746 -5.741227
## [179,] 37.16469 -5.746802
## [180,] 37.18567 -5.746760
## [181,] 37.20132 -5.748552
## [182,] 37.20441 -5.751857
## [183,] 37.20541 -5.714694
## [184,] 37.18772 -5.714381
## [185,] 37.16526 -5.716034
## [186,] 37.18395 -5.683050
## [187,] 37.20910 -5.655687
## [188,] 37.21825 -5.649763
## [189,] 37.22204 -5.642369
## [190,] 37.22354 -5.627709
## [191,] 37.23340 -5.623238
## [192,] 37.24224 -5.625803
## [193,] 37.24667 -5.618711
## [194,] 37.24405 -5.613802
## [195,] 37.25656 -5.602936
## [196,] 37.24923 -5.599484
## [197,] 37.25551 -5.584618
## [198,] 37.25064 -5.578907
## [199,] 37.23746 -5.570660
## [200,] 37.23877 -5.561721
## [201,] 37.24675 -5.549800
## [202,] 37.25070 -5.536397
## [203,] 37.26981 -5.523283
## [204,] 37.28895 -5.500551
## [205,] 37.33002 -5.449287
## [206,] 37.38667 -5.261727
## [207,] 37.38667 -5.252916
## [208,] 37.35897 -5.216411
## [209,] 37.38020 -5.193934
## [210,] 37.46275 -5.095832
## [211,] 37.48229 -5.071829
## [212,] 37.48989 -5.059062
## [213,] 37.58429 -5.004935
## [214,] 37.59688 -5.004935
## [215,] 37.62913 -5.013318
## [216,] 37.67744 -5.037718
## [217,] 37.68557 -5.039195
## [218,] 37.70477 -5.028857
## [219,] 37.73535 -5.016264
## [220,] 37.76529 -5.009256
## [221,] 37.76970 -5.013784
## [222,] 37.78767 -5.022348
## [223,] 37.79233 -5.030317
## [224,] 37.80474 -5.020589
## [225,] 37.82461 -5.020278
## [226,] 37.82679 -5.006664
## [227,] 37.83902 -4.986385
## [228,] 37.84839 -4.978676
## [229,] 37.86254 -4.979288
## [230,] 37.86933 -4.975666
## [231,] 37.88722 -4.973289
## [232,] 37.88826 -4.977642
## [233,] 37.89985 -4.975365
## [234,] 37.90226 -4.968138
## [235,] 37.91072 -4.965120
## [236,] 37.92417 -4.967396
## [237,] 37.93162 -4.963257
## [238,] 37.93700 -4.965741
## [239,] 37.94383 -4.960877
## [240,] 37.95625 -4.966051
## [241,] 37.96339 -4.978987
## [242,] 37.98016 -4.988922
## [243,] 38.00005 -4.989865
## [244,] 37.99674 -4.963924
## [245,] 37.99693 -4.940927
## [246,] 37.99453 -4.916642
## [247,] 37.99821 -4.872303
## [248,] 37.99969 -4.865680
## [249,] 37.99398 -4.833484
## [250,] 37.99417 -4.817846
## [251,] 37.99766 -4.794481
## [252,] 37.99748 -4.777371
## [253,] 37.99527 -4.769460
## [254,] 37.98607 -4.762101
## [255,] 37.98147 -4.751614
## [256,] 37.98736 -4.726593
## [257,] 37.99361 -4.708012
## [258,] 37.99398 -4.668825
## [259,] 37.99567 -4.646535
## [260,] 37.99903 -4.622779
## [261,] 37.99856 -4.611330
## [262,] 38.00517 -4.591399
## [263,] 38.01799 -4.597643
## [264,] 38.02881 -4.597844
## [265,] 38.03737 -4.593470
## [266,] 38.04978 -4.613710
## [267,] 38.07888 -4.612644
## [268,] 38.08847 -4.609293
## [269,] 38.10888 -4.596041
## [270,] 38.11863 -4.572583
## [271,] 38.12022 -4.530623
## [272,] 38.15007 -4.490573
## [273,] 38.17898 -4.453282
## [274,] 38.20631 -4.411192
## [275,] 38.23863 -4.364578
## [276,] 38.27405 -4.311939
## [277,] 38.34192 -4.205813
## [278,] 38.35626 -4.181104
## [279,] 38.40353 -4.108887
## [280,] 38.42793 -4.125216
## [281,] 38.49105 -4.168957
## [282,] 38.60254 -4.247132
## [283,] 38.75990 -4.358039
## [284,] 38.80194 -4.385197
## [285,] 38.87987 -4.439320
## [286,] 38.96364 -4.496120
## [287,] 39.08297 -4.580460
## [288,] 39.19192 -4.658011
## [289,] 39.19538 -4.661063
## [290,] 39.19183 -4.676219
## [291,] 39.17988 -4.686501
## [292,] 39.18119 -4.701715
## [293,] 39.18725 -4.716455
## [294,] 39.17839 -4.726915
## [295,] 39.17025 -4.732799
## [296,] 39.16675 -4.743913
## [297,] 39.17293 -4.752352
## [298,] 39.17546 -4.763356
## [299,] 39.16774 -4.775623
## [300,] 39.16768 -4.784518
## [301,] 39.17663 -4.795533
## [302,] 39.18265 -4.807895
## [303,] 39.18955 -4.805756
## [304,] 39.20032 -4.812887
## [305,] 39.20920 -4.799812
## [306,] 39.20112 -4.792522
## [307,] 39.21451 -4.790065
## [308,] 39.22006 -4.806627
## [309,] 39.21697 -4.820416
## [310,] 39.19607 -4.828127
## [311,] 39.19177 -4.844417
## [312,] 39.19879 -4.850702
## [313,] 39.20530 -4.851209
## [314,] 39.20744 -4.838907
## [315,] 39.21417 -4.843052
## [316,] 39.21131 -4.857405
## [317,] 39.20445 -4.873095
## [318,] 39.19727 -4.880539
## [319,] 39.19322 -4.894134
## [320,] 39.18546 -4.906348
## [321,] 39.18336 -4.920255
## [322,] 39.17360 -4.933494
## [323,] 39.17837 -4.910360
## [324,] 39.17405 -4.898235
## [325,] 39.18234 -4.888161
## [326,] 39.17757 -4.882946
## [327,] 39.17779 -4.868549
## [328,] 39.17441 -4.866052
## [329,] 39.17803 -4.852473
## [330,] 39.17143 -4.844015
## [331,] 39.17048 -4.832629
## [332,] 39.16437 -4.828261
## [333,] 39.14750 -4.830136
## [334,] 39.15951 -4.845707
## [335,] 39.15480 -4.865313
## [336,] 39.14826 -4.871256
## [337,] 39.14089 -4.892712
## [338,] 39.14600 -4.896991
## [339,] 39.13287 -4.919456
## [340,] 39.12657 -4.917376
## [341,] 39.11498 -4.906797
## [342,] 39.10619 -4.893786
## [343,] 39.09739 -4.895926
## [344,] 39.10357 -4.904365
## [345,] 39.09822 -4.916430
## [346,] 39.09126 -4.922351
## [347,] 39.10199 -4.928732
## [348,] 39.11053 -4.922203
## [349,] 39.13553 -4.939398
## [350,] 39.14235 -4.960836
## [351,] 39.13531 -4.971392
## [352,] 39.12779 -4.977660
## [353,] 39.11425 -4.972620
## [354,] 39.10216 -4.963195
## [355,] 39.09391 -4.972089
## [356,] 39.10973 -4.983892
## [357,] 39.11800 -4.982933
## [358,] 39.13503 -4.999358
## [359,] 39.13119 -5.022258
## [360,] 39.12771 -5.024776
## [361,] 39.10613 -5.018661
## [362,] 39.08671 -5.024656
## [363,] 39.08083 -5.019141
## [364,] 39.07352 -5.023936
## [365,] 39.07076 -5.033648
## [366,] 39.05026 -5.043359
## [367,] 39.05841 -5.049114
## [368,] 39.06849 -5.048394
## [369,] 39.07628 -5.053430
## [370,] 39.07470 -5.062285
## [371,] 39.09465 -5.062621
## [372,] 39.09939 -5.066090
## [373,] 39.12504 -5.055384
## [374,] 39.12414 -5.067650
## [375,] 39.12716 -5.085055
## [376,] 39.13344 -5.105558
## [377,] 39.12672 -5.103065
## [378,] 39.12051 -5.112964
## [379,] 39.10781 -5.126337
## [380,] 39.10029 -5.138172
## [381,] 39.10065 -5.149322
## [382,] 39.09597 -5.158913
## [383,] 39.09549 -5.180494
## [384,] 39.08350 -5.193203
## [385,] 39.07487 -5.198358
## [386,] 39.06431 -5.209790
## [387,] 39.06215 -5.222270
## [388,] 39.07563 -5.220107
## [389,] 39.08877 -5.223102
## [390,] 39.08761 -5.230590
## [391,] 39.07047 -5.260376
## [392,] 39.06713 -5.272020
## [393,] 39.06699 -5.284988
## [394,] 39.05897 -5.309252
## [395,] 39.04804 -5.330006
## [396,] 39.04433 -5.345531
## [397,] 39.03331 -5.369766
## [398,] 39.02697 -5.391083
## [399,] 39.01722 -5.408378
## [400,] 39.00701 -5.405392
## [401,] 38.99230 -5.410592
## [402,] 38.98142 -5.428874
## [403,] 38.98755 -5.442351
## [404,] 38.99934 -5.446413
## [405,] 38.99999 -5.454620
## [406,] 38.99465 -5.479899
## [407,] 38.99075 -5.490154
## [408,] 38.98281 -5.499544
## [409,] 38.97789 -5.518033
## [410,] 38.96879 -5.533778
## [411,] 38.96836 -5.549523
## [412,] 38.94965 -5.567419
## [413,] 38.93501 -5.600075
## [414,] 38.93289 -5.613172
## [415,] 38.91613 -5.626846
## [416,] 38.91440 -5.637632
## [417,] 38.90342 -5.641484
## [418,] 38.90548 -5.647238
## [419,] 38.89826 -5.661680
## [420,] 38.89465 -5.696882
## [421,] 38.89104 -5.717642
## [422,] 38.87840 -5.742013
## [423,] 38.84952 -5.786241
## [424,] 38.82153 -5.836788
## [425,] 38.81522 -5.865672
## [426,] 38.81702 -5.911706
## [427,] 38.81612 -5.934271
## [428,] 38.80619 -5.943297
## [429,] 38.79584 -5.962273
## 
## 
## 
## Slot "plotOrder":
## [1] 1
## 
## Slot "labpt":
## [1] 38.276477 -5.217057
## 
## Slot "ID":
## [1] "0"
## 
## Slot "area":
## [1] 2.275229
## 
## 
## [[2]]
## An object of class "Polygons"
## Slot "Polygons":
## [[1]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 32.821628 -5.263664
## 
## Slot "area":
## [1] 6.150522
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##            [,1]      [,2]
##   [1,] 34.11627 -5.191904
##   [2,] 34.16779 -5.207540
##   [3,] 34.18141 -5.222216
##   [4,] 34.18549 -5.233624
##   [5,] 34.17953 -5.268623
##   [6,] 34.18201 -5.277201
##   [7,] 34.17140 -5.298164
##   [8,] 34.18239 -5.306808
##   [9,] 34.18608 -5.327867
##  [10,] 34.19868 -5.338354
##  [11,] 34.20703 -5.340269
##  [12,] 34.20979 -5.346792
##  [13,] 34.21023 -5.359728
##  [14,] 34.22181 -5.374282
##  [15,] 34.23646 -5.386983
##  [16,] 34.24160 -5.395390
##  [17,] 34.23716 -5.409227
##  [18,] 34.22165 -5.414568
##  [19,] 34.20453 -5.425930
##  [20,] 34.19258 -5.427921
##  [21,] 34.17950 -5.439727
##  [22,] 34.17155 -5.449615
##  [23,] 34.16589 -5.466795
##  [24,] 34.16055 -5.471059
##  [25,] 34.15849 -5.487213
##  [26,] 34.14570 -5.518668
##  [27,] 34.13215 -5.545203
##  [28,] 34.12952 -5.556190
##  [29,] 34.12125 -5.577412
##  [30,] 34.11107 -5.589171
##  [31,] 34.10617 -5.599405
##  [32,] 34.08619 -5.624815
##  [33,] 34.07074 -5.648323
##  [34,] 34.04167 -5.666932
##  [35,] 34.01787 -5.680229
##  [36,] 34.00574 -5.706855
##  [37,] 34.03901 -5.717127
##  [38,] 34.05257 -5.729598
##  [39,] 34.05613 -5.745437
##  [40,] 34.06314 -5.762945
##  [41,] 34.09594 -5.798189
##  [42,] 34.10787 -5.813100
##  [43,] 34.11004 -5.838313
##  [44,] 34.10672 -5.863614
##  [45,] 34.09616 -5.881123
##  [46,] 34.08718 -5.887358
##  [47,] 34.07098 -5.894183
##  [48,] 34.05446 -5.898551
##  [49,] 34.03081 -5.908046
##  [50,] 34.02299 -5.915564
##  [51,] 34.01401 -5.937279
##  [52,] 34.01208 -5.975348
##  [53,] 33.99861 -6.010195
##  [54,] 33.99428 -6.025377
##  [55,] 33.97801 -6.053030
##  [56,] 33.95686 -6.071194
##  [57,] 33.95036 -6.078785
##  [58,] 33.97599 -6.079651
##  [59,] 33.96917 -6.100772
##  [60,] 33.95693 -6.126344
##  [61,] 33.94295 -6.147591
##  [62,] 33.93057 -6.169607
##  [63,] 33.92474 -6.212061
##  [64,] 33.91278 -6.246086
##  [65,] 33.90644 -6.268561
##  [66,] 33.90723 -6.276843
##  [67,] 33.90096 -6.292516
##  [68,] 33.90303 -6.301734
##  [69,] 33.88546 -6.323119
##  [70,] 33.87624 -6.339130
##  [71,] 33.87439 -6.348541
##  [72,] 33.86193 -6.357969
##  [73,] 33.85377 -6.359843
##  [74,] 33.83378 -6.374348
##  [75,] 33.79886 -6.379823
##  [76,] 33.78756 -6.388669
##  [77,] 33.78753 -6.398937
##  [78,] 33.78143 -6.415337
##  [79,] 33.77473 -6.419137
##  [80,] 33.76193 -6.419537
##  [81,] 33.75253 -6.424937
##  [82,] 33.74317 -6.439203
##  [83,] 33.73202 -6.447209
##  [84,] 33.71587 -6.451817
##  [85,] 33.70723 -6.462137
##  [86,] 33.69913 -6.465637
##  [87,] 33.68853 -6.486537
##  [88,] 33.68343 -6.501237
##  [89,] 33.67653 -6.510937
##  [90,] 33.66003 -6.519937
##  [91,] 33.64093 -6.539737
##  [92,] 33.62923 -6.539837
##  [93,] 33.61063 -6.546937
##  [94,] 33.58963 -6.556937
##  [95,] 33.58473 -6.564337
##  [96,] 33.56943 -6.580637
##  [97,] 33.56253 -6.592337
##  [98,] 33.54823 -6.605937
##  [99,] 33.54423 -6.625937
## [100,] 33.53333 -6.643637
## [101,] 33.52923 -6.665137
## [102,] 33.52123 -6.688837
## [103,] 33.52453 -6.749937
## [104,] 33.52493 -6.863937
## [105,] 33.52743 -6.873737
## [106,] 33.52153 -6.885937
## [107,] 33.51973 -6.895837
## [108,] 33.50713 -6.919337
## [109,] 33.49613 -6.935337
## [110,] 33.48655 -6.943163
## [111,] 33.47246 -6.940938
## [112,] 33.46251 -6.945239
## [113,] 33.45151 -6.941130
## [114,] 33.44138 -6.943886
## [115,] 33.43692 -6.949555
## [116,] 33.42301 -6.956434
## [117,] 33.41356 -6.947859
## [118,] 33.40463 -6.949069
## [119,] 33.38848 -6.946679
## [120,] 33.37491 -6.950123
## [121,] 33.36770 -6.958711
## [122,] 33.35207 -6.956320
## [123,] 33.33558 -6.949123
## [124,] 33.33266 -6.952215
## [125,] 33.32029 -6.948447
## [126,] 33.31479 -6.942099
## [127,] 33.29968 -6.948288
## [128,] 33.28868 -6.941772
## [129,] 33.27082 -6.946761
## [130,] 33.24643 -6.949521
## [131,] 33.23166 -6.955708
## [132,] 33.21465 -6.951253
## [133,] 33.20401 -6.952802
## [134,] 33.18425 -6.948004
## [135,] 33.17737 -6.932729
## [136,] 33.16604 -6.928957
## [137,] 33.15349 -6.916945
## [138,] 33.13426 -6.914720
## [139,] 33.11949 -6.911290
## [140,] 33.11674 -6.904253
## [141,] 33.09320 -6.883831
## [142,] 33.08496 -6.882116
## [143,] 33.07583 -6.868766
## [144,] 33.06599 -6.865793
## [145,] 33.05316 -6.866710
## [146,] 33.04836 -6.870143
## [147,] 33.03485 -6.868771
## [148,] 33.02614 -6.865110
## [149,] 33.01025 -6.873369
## [150,] 32.99857 -6.869421
## [151,] 32.99531 -6.865129
## [152,] 32.98174 -6.866674
## [153,] 32.97367 -6.877145
## [154,] 32.95083 -6.889331
## [155,] 32.94241 -6.897054
## [156,] 32.93176 -6.898941
## [157,] 32.91785 -6.894991
## [158,] 32.91544 -6.903058
## [159,] 32.90600 -6.903056
## [160,] 32.89981 -6.908548
## [161,] 32.89878 -6.918676
## [162,] 32.89122 -6.927455
## [163,] 32.88641 -6.938784
## [164,] 32.87404 -6.941527
## [165,] 32.86820 -6.945988
## [166,] 32.86047 -6.942553
## [167,] 32.85549 -6.933797
## [168,] 32.84072 -6.929501
## [169,] 32.82492 -6.937392
## [170,] 32.81322 -6.932574
## [171,] 32.80474 -6.940582
## [172,] 32.78917 -6.944466
## [173,] 32.78595 -6.970098
## [174,] 32.77908 -6.976504
## [175,] 32.74681 -6.975367
## [176,] 32.74599 -6.953600
## [177,] 32.74712 -6.925701
## [178,] 32.74648 -6.883929
## [179,] 32.74734 -6.876970
## [180,] 32.74667 -6.843996
## [181,] 32.74754 -6.838841
## [182,] 32.74637 -6.797298
## [183,] 32.74667 -6.758328
## [184,] 32.75497 -6.736681
## [185,] 32.75679 -6.712987
## [186,] 32.75436 -6.663193
## [187,] 32.75638 -6.657120
## [188,] 32.75881 -6.615828
## [189,] 32.75598 -6.569272
## [190,] 32.75598 -6.517859
## [191,] 32.75355 -6.499641
## [192,] 32.75355 -6.406935
## [193,] 32.73201 -6.394234
## [194,] 32.70740 -6.388914
## [195,] 32.70128 -6.391496
## [196,] 32.68898 -6.382849
## [197,] 32.68593 -6.375037
## [198,] 32.67693 -6.364237
## [199,] 32.66354 -6.360584
## [200,] 32.65942 -6.345750
## [201,] 32.63373 -6.327437
## [202,] 32.61783 -6.327737
## [203,] 32.59470 -6.333457
## [204,] 32.58685 -6.333539
## [205,] 32.57540 -6.321331
## [206,] 32.56819 -6.321869
## [207,] 32.56123 -6.315337
## [208,] 32.55257 -6.317263
## [209,] 32.54665 -6.311713
## [210,] 32.53443 -6.310637
## [211,] 32.52963 -6.313337
## [212,] 32.51190 -6.314210
## [213,] 32.50239 -6.303441
## [214,] 32.48650 -6.304673
## [215,] 32.47846 -6.302465
## [216,] 32.47673 -6.309137
## [217,] 32.46349 -6.303403
## [218,] 32.45214 -6.305307
## [219,] 32.44182 -6.302227
## [220,] 32.43739 -6.295634
## [221,] 32.41854 -6.284245
## [222,] 32.40792 -6.275040
## [223,] 32.40648 -6.266330
## [224,] 32.37194 -6.246213
## [225,] 32.36280 -6.245676
## [226,] 32.36083 -6.237007
## [227,] 32.34773 -6.229937
## [228,] 32.33880 -6.230027
## [229,] 32.33474 -6.225848
## [230,] 32.32793 -6.232437
## [231,] 32.31513 -6.234737
## [232,] 32.31564 -6.228726
## [233,] 32.30332 -6.228952
## [234,] 32.30173 -6.237837
## [235,] 32.29146 -6.239821
## [236,] 32.27068 -6.222311
## [237,] 32.26877 -6.217052
## [238,] 32.24939 -6.214556
## [239,] 32.24486 -6.202263
## [240,] 32.23410 -6.194580
## [241,] 32.22171 -6.195760
## [242,] 32.20312 -6.179829
## [243,] 32.19900 -6.169423
## [244,] 32.20070 -6.161561
## [245,] 32.19014 -6.156818
## [246,] 32.18955 -6.146493
## [247,] 32.17952 -6.144133
## [248,] 32.18116 -6.135408
## [249,] 32.18722 -6.125016
## [250,] 32.17952 -6.108141
## [251,] 32.16628 -6.103555
## [252,] 32.17067 -6.083655
## [253,] 32.16254 -6.080453
## [254,] 32.16919 -6.066544
## [255,] 32.15495 -6.054576
## [256,] 32.14530 -6.034388
## [257,] 32.14533 -6.026261
## [258,] 32.13379 -6.025833
## [259,] 32.13471 -6.018262
## [260,] 32.12623 -5.999637
## [261,] 32.11893 -5.996437
## [262,] 32.12124 -5.981231
## [263,] 32.11353 -5.976437
## [264,] 32.11040 -5.965975
## [265,] 32.11379 -5.959208
## [266,] 32.09823 -5.948837
## [267,] 32.09483 -5.941837
## [268,] 32.09313 -5.928137
## [269,] 32.08553 -5.922337
## [270,] 32.08493 -5.900037
## [271,] 32.08273 -5.894437
## [272,] 32.08883 -5.868337
## [273,] 32.08463 -5.851937
## [274,] 32.07613 -5.838137
## [275,] 32.06273 -5.828237
## [276,] 32.05323 -5.830837
## [277,] 32.04393 -5.822637
## [278,] 32.04125 -5.810678
## [279,] 32.02790 -5.791330
## [280,] 32.03231 -5.783857
## [281,] 32.02879 -5.767283
## [282,] 32.02506 -5.762591
## [283,] 32.00821 -5.763499
## [284,] 32.00308 -5.756461
## [285,] 31.99559 -5.758322
## [286,] 31.97829 -5.754543
## [287,] 31.96849 -5.743279
## [288,] 31.96005 -5.751698
## [289,] 31.93823 -5.748261
## [290,] 31.91928 -5.749279
## [291,] 31.91115 -5.737139
## [292,] 31.89983 -5.742653
## [293,] 31.88746 -5.739466
## [294,] 31.88485 -5.730235
## [295,] 31.87248 -5.733374
## [296,] 31.85933 -5.729394
## [297,] 31.83592 -5.728557
## [298,] 31.82648 -5.712459
## [299,] 31.80516 -5.715842
## [300,] 31.79382 -5.725043
## [301,] 31.78699 -5.721866
## [302,] 31.77698 -5.726589
## [303,] 31.77538 -5.738710
## [304,] 31.76746 -5.750553
## [305,] 31.74139 -5.761830
## [306,] 31.73350 -5.759704
## [307,] 31.73347 -5.769983
## [308,] 31.71951 -5.779176
## [309,] 31.71396 -5.788652
## [310,] 31.70951 -5.780735
## [311,] 31.69817 -5.788089
## [312,] 31.70210 -5.796005
## [313,] 31.69497 -5.807849
## [314,] 31.68786 -5.812576
## [315,] 31.67812 -5.812553
## [316,] 31.66994 -5.823077
## [317,] 31.66124 -5.827273
## [318,] 31.64993 -5.824874
## [319,] 31.64389 -5.820643
## [320,] 31.63521 -5.820622
## [321,] 31.62438 -5.837199
## [322,] 31.61649 -5.836916
## [323,] 31.61125 -5.825834
## [324,] 31.59336 -5.822891
## [325,] 31.59229 -5.831849
## [326,] 31.58386 -5.833936
## [327,] 31.57861 -5.830233
## [328,] 31.57443 -5.818363
## [329,] 31.56759 -5.816237
## [330,] 31.56446 -5.808586
## [331,] 31.55734 -5.811994
## [332,] 31.55210 -5.805129
## [333,] 31.54182 -5.811164
## [334,] 31.52946 -5.810605
## [335,] 31.51942 -5.824283
## [336,] 31.49286 -5.818151
## [337,] 31.48679 -5.826304
## [338,] 31.47864 -5.824438
## [339,] 31.46890 -5.826783
## [340,] 31.46390 -5.823607
## [341,] 31.44495 -5.826454
## [342,] 31.42917 -5.825092
## [343,] 31.41785 -5.826378
## [344,] 31.40893 -5.818975
## [345,] 31.40316 -5.810525
## [346,] 31.38557 -5.799407
## [347,] 31.38006 -5.792803
## [348,] 31.37322 -5.791466
## [349,] 31.35926 -5.796960
## [350,] 31.34638 -5.795078
## [351,] 31.32877 -5.789492
## [352,] 31.31931 -5.783930
## [353,] 31.30932 -5.782583
## [354,] 31.29637 -5.801781
## [355,] 31.27717 -5.803976
## [356,] 31.26956 -5.793531
## [357,] 31.25984 -5.789812
## [358,] 31.25302 -5.783730
## [359,] 31.25173 -5.773976
## [360,] 31.24471 -5.748131
## [361,] 31.23946 -5.743899
## [362,] 31.23233 -5.753099
## [363,] 31.21530 -5.753856
## [364,] 31.20265 -5.738251
## [365,] 31.19160 -5.740587
## [366,] 31.18695 -5.747930
## [367,] 31.17923 -5.752014
## [368,] 31.16890 -5.762122
## [369,] 31.15633 -5.761783
## [370,] 31.14572 -5.766465
## [371,] 31.14417 -5.759778
## [372,] 31.15799 -5.743279
## [373,] 31.15771 -5.724933
## [374,] 31.15433 -5.712274
## [375,] 31.14180 -5.703566
## [376,] 31.14282 -5.691975
## [377,] 31.15756 -5.683135
## [378,] 31.15681 -5.678291
## [379,] 31.14366 -5.674880
## [380,] 31.13798 -5.670342
## [381,] 31.14243 -5.650315
## [382,] 31.13877 -5.644770
## [383,] 31.12027 -5.639487
## [384,] 31.11475 -5.633997
## [385,] 31.10599 -5.616207
## [386,] 31.08892 -5.608510
## [387,] 31.06357 -5.592492
## [388,] 31.04586 -5.574422
## [389,] 31.04418 -5.564982
## [390,] 31.03802 -5.553169
## [391,] 31.05061 -5.536052
## [392,] 31.06631 -5.525175
## [393,] 31.07054 -5.518865
## [394,] 31.07005 -5.508588
## [395,] 31.06614 -5.496719
## [396,] 31.07801 -5.485954
## [397,] 31.08171 -5.479379
## [398,] 31.10305 -5.465745
## [399,] 31.13066 -5.462934
## [400,] 31.14724 -5.457979
## [401,] 31.15989 -5.449322
## [402,] 31.16752 -5.446974
## [403,] 31.18413 -5.432531
## [404,] 31.18628 -5.417518
## [405,] 31.18240 -5.395636
## [406,] 31.18692 -5.377995
## [407,] 31.18186 -5.278944
## [408,] 31.18018 -5.254392
## [409,] 31.18676 -5.250986
## [410,] 31.19964 -5.252604
## [411,] 31.20593 -5.256575
## [412,] 31.21277 -5.254487
## [413,] 31.21542 -5.247379
## [414,] 31.22543 -5.240557
## [415,] 31.23250 -5.240885
## [416,] 31.25126 -5.249116
## [417,] 31.26186 -5.260297
## [418,] 31.26727 -5.271216
## [419,] 31.26427 -5.284094
## [420,] 31.26770 -5.295256
## [421,] 31.28844 -5.303244
## [422,] 31.30055 -5.304516
## [423,] 31.32794 -5.322434
## [424,] 31.33930 -5.325191
## [425,] 31.35567 -5.321143
## [426,] 31.37038 -5.331916
## [427,] 31.37459 -5.317151
## [428,] 31.37086 -5.306128
## [429,] 31.38102 -5.304761
## [430,] 31.38225 -5.313825
## [431,] 31.39979 -5.305088
## [432,] 31.41992 -5.319220
## [433,] 31.42702 -5.315893
## [434,] 31.42565 -5.309476
## [435,] 31.41616 -5.299938
## [436,] 31.40509 -5.292745
## [437,] 31.38963 -5.262298
## [438,] 31.38414 -5.254614
## [439,] 31.37663 -5.252441
## [440,] 31.35570 -5.252117
## [441,] 31.35412 -5.239330
## [442,] 31.34209 -5.235854
## [443,] 31.32632 -5.244423
## [444,] 31.30940 -5.249303
## [445,] 31.30160 -5.257489
## [446,] 31.29821 -5.267437
## [447,] 31.30127 -5.278344
## [448,] 31.29091 -5.288273
## [449,] 31.28141 -5.277886
## [450,] 31.27995 -5.269943
## [451,] 31.28989 -5.266607
## [452,] 31.29208 -5.253023
## [453,] 31.27395 -5.255530
## [454,] 31.25599 -5.246734
## [455,] 31.25159 -5.239052
## [456,] 31.25308 -5.226906
## [457,] 31.24145 -5.218034
## [458,] 31.23312 -5.220029
## [459,] 31.20832 -5.212289
## [460,] 31.20281 -5.198232
## [461,] 31.20287 -5.190612
## [462,] 31.20987 -5.182693
## [463,] 31.22023 -5.175726
## [464,] 31.21826 -5.159171
## [465,] 31.20473 -5.150387
## [466,] 31.20407 -5.146483
## [467,] 31.21043 -5.128337
## [468,] 31.21048 -5.109097
## [469,] 31.22153 -5.094327
## [470,] 31.22450 -5.085321
## [471,] 31.23636 -5.065844
## [472,] 31.24685 -5.055646
## [473,] 31.24893 -5.031298
## [474,] 31.25836 -5.019214
## [475,] 31.25866 -5.006297
## [476,] 31.24909 -4.997371
## [477,] 31.23938 -4.994568
## [478,] 31.23367 -4.957030
## [479,] 31.23464 -4.948660
## [480,] 31.24422 -4.935051
## [481,] 31.25592 -4.928624
## [482,] 31.27596 -4.922935
## [483,] 31.30125 -4.920608
## [484,] 31.31008 -4.915846
## [485,] 31.30892 -4.906514
## [486,] 31.31228 -4.896715
## [487,] 31.32161 -4.883103
## [488,] 31.33715 -4.869028
## [489,] 31.34338 -4.855887
## [490,] 31.35843 -4.843963
## [491,] 31.36372 -4.826752
## [492,] 31.37757 -4.816020
## [493,] 31.37855 -4.806932
## [494,] 31.38830 -4.808818
## [495,] 31.39748 -4.806226
## [496,] 31.39407 -4.792312
## [497,] 31.39462 -4.781125
## [498,] 31.40132 -4.766294
## [499,] 31.39309 -4.766275
## [500,] 31.39354 -4.750802
## [501,] 31.39192 -4.732710
## [502,] 31.38756 -4.723812
## [503,] 31.40186 -4.713076
## [504,] 31.40825 -4.698871
## [505,] 31.42367 -4.698488
## [506,] 31.42918 -4.704774
## [507,] 31.44107 -4.700723
## [508,] 31.45693 -4.690929
## [509,] 31.45762 -4.684050
## [510,] 31.46627 -4.681664
## [511,] 31.47016 -4.666198
## [512,] 31.47621 -4.661924
## [513,] 31.49255 -4.622540
## [514,] 31.48374 -4.603073
## [515,] 31.48990 -4.593152
## [516,] 31.49075 -4.586358
## [517,] 31.48149 -4.582783
## [518,] 31.47549 -4.559244
## [519,] 31.47937 -4.550051
## [520,] 31.47302 -4.544391
## [521,] 31.47264 -4.530484
## [522,] 31.46619 -4.526915
## [523,] 31.45799 -4.512887
## [524,] 31.45888 -4.504050
## [525,] 31.46525 -4.500235
## [526,] 31.46272 -4.491618
## [527,] 31.46688 -4.478868
## [528,] 31.46594 -4.472486
## [529,] 31.45547 -4.465447
## [530,] 31.45744 -4.457449
## [531,] 31.45779 -4.457219
## [532,] 31.46123 -4.459762
## [533,] 31.46946 -4.458777
## [534,] 31.48412 -4.438393
## [535,] 31.49558 -4.429166
## [536,] 31.49560 -4.420235
## [537,] 31.49943 -4.411311
## [538,] 31.50611 -4.411006
## [539,] 31.54930 -4.424170
## [540,] 31.56836 -4.425483
## [541,] 31.59187 -4.429675
## [542,] 31.60300 -4.424273
## [543,] 31.61381 -4.424294
## [544,] 31.62303 -4.421121
## [545,] 31.64470 -4.387666
## [546,] 31.65297 -4.380663
## [547,] 31.65873 -4.359938
## [548,] 31.66478 -4.351335
## [549,] 31.67214 -4.322319
## [550,] 31.66676 -4.311144
## [551,] 31.65788 -4.300282
## [552,] 31.65570 -4.277629
## [553,] 31.67000 -4.275102
## [554,] 31.67925 -4.255021
## [555,] 31.66942 -4.242244
## [556,] 31.67038 -4.237779
## [557,] 31.68280 -4.222807
## [558,] 31.67682 -4.186111
## [559,] 31.66922 -4.175890
## [560,] 31.66669 -4.165358
## [561,] 31.66830 -4.153558
## [562,] 31.64322 -4.145859
## [563,] 31.63466 -4.134679
## [564,] 31.63594 -4.128301
## [565,] 31.64771 -4.115561
## [566,] 31.64869 -4.100251
## [567,] 31.65857 -4.084636
## [568,] 31.66017 -4.072836
## [569,] 31.67384 -4.067435
## [570,] 31.68295 -4.053116
## [571,] 31.68983 -4.056091
## [572,] 31.70997 -4.060077
## [573,] 31.72148 -4.067276
## [574,] 31.74298 -4.073052
## [575,] 31.75175 -4.077695
## [576,] 31.76976 -4.081997
## [577,] 31.78448 -4.087916
## [578,] 31.82776 -4.089025
## [579,] 31.85367 -4.095190
## [580,] 31.86650 -4.096765
## [581,] 31.88598 -4.101780
## [582,] 31.89869 -4.110031
## [583,] 31.93919 -4.124360
## [584,] 31.95196 -4.133813
## [585,] 31.96768 -4.153484
## [586,] 31.98409 -4.166046
## [587,] 31.99530 -4.181288
## [588,] 32.00242 -4.187438
## [589,] 32.01022 -4.186312
## [590,] 32.01381 -4.191357
## [591,] 32.02979 -4.199801
## [592,] 32.04031 -4.211191
## [593,] 32.05586 -4.213302
## [594,] 32.06404 -4.222934
## [595,] 32.07029 -4.224894
## [596,] 32.08111 -4.235923
## [597,] 32.08597 -4.236347
## [598,] 32.11093 -4.246674
## [599,] 32.11781 -4.244621
## [600,] 32.14580 -4.244145
## [601,] 32.17505 -4.252152
## [602,] 32.18513 -4.259719
## [603,] 32.21213 -4.262153
## [604,] 32.22274 -4.260301
## [605,] 32.23195 -4.267092
## [606,] 32.24229 -4.265432
## [607,] 32.25180 -4.270051
## [608,] 32.26991 -4.270464
## [609,] 32.28827 -4.275176
## [610,] 32.30809 -4.267857
## [611,] 32.32544 -4.269077
## [612,] 32.33115 -4.273288
## [613,] 32.34572 -4.278244
## [614,] 32.35655 -4.287150
## [615,] 32.35634 -4.294070
## [616,] 32.36854 -4.305944
## [617,] 32.38358 -4.309161
## [618,] 32.40150 -4.323837
## [619,] 32.41231 -4.304063
## [620,] 32.41865 -4.283209
## [621,] 32.41970 -4.251114
## [622,] 32.41029 -4.227108
## [623,] 32.40700 -4.211103
## [624,] 32.42253 -4.210162
## [625,] 32.43965 -4.213246
## [626,] 32.44356 -4.211293
## [627,] 32.46398 -4.221237
## [628,] 32.48447 -4.227589
## [629,] 32.49701 -4.221948
## [630,] 32.50216 -4.214845
## [631,] 32.50224 -4.192010
## [632,] 32.50713 -4.185544
## [633,] 32.52187 -4.178086
## [634,] 32.53163 -4.176310
## [635,] 32.53767 -4.179151
## [636,] 32.54779 -4.193003
## [637,] 32.56378 -4.200461
## [638,] 32.58011 -4.201349
## [639,] 32.58473 -4.217331
## [640,] 32.58864 -4.243257
## [641,] 32.59219 -4.251426
## [642,] 32.59008 -4.285925
## [643,] 32.61183 -4.277917
## [644,] 32.63107 -4.273116
## [645,] 32.64324 -4.272664
## [646,] 32.65184 -4.268392
## [647,] 32.66406 -4.266120
## [648,] 32.67116 -4.259930
## [649,] 32.68571 -4.254922
## [650,] 32.69668 -4.253491
## [651,] 32.70801 -4.248663
## [652,] 32.72225 -4.246499
## [653,] 32.74096 -4.236586
## [654,] 32.74501 -4.227929
## [655,] 32.73556 -4.207748
## [656,] 32.73007 -4.186465
## [657,] 32.69722 -4.190118
## [658,] 32.68149 -4.173847
## [659,] 32.67358 -4.167888
## [660,] 32.66091 -4.166778
## [661,] 32.64744 -4.146012
## [662,] 32.63846 -4.129737
## [663,] 32.65923 -4.126369
## [664,] 32.67270 -4.118512
## [665,] 32.67775 -4.097185
## [666,] 32.69122 -4.086522
## [667,] 32.69290 -4.071368
## [668,] 32.68785 -4.041623
## [669,] 32.70087 -4.000413
## [670,] 32.70179 -3.986926
## [671,] 32.70002 -3.967858
## [672,] 32.70343 -3.945012
## [673,] 32.74224 -3.945987
## [674,] 32.75265 -3.951062
## [675,] 32.77976 -3.950604
## [676,] 32.79204 -3.952702
## [677,] 32.81243 -3.950147
## [678,] 32.82367 -3.940186
## [679,] 32.83491 -3.935489
## [680,] 32.84336 -3.920586
## [681,] 32.84905 -3.915942
## [682,] 32.85718 -3.915917
## [683,] 32.89425 -3.921270
## [684,] 32.90625 -3.924687
## [685,] 32.92157 -3.925727
## [686,] 32.92386 -3.919326
## [687,] 32.93332 -3.914209
## [688,] 32.95100 -3.912928
## [689,] 32.97996 -3.907111
## [690,] 33.01270 -3.906215
## [691,] 33.02199 -3.915435
## [692,] 33.02786 -3.937255
## [693,] 33.03858 -3.941378
## [694,] 33.04309 -3.946418
## [695,] 33.06321 -3.956267
## [696,] 33.06829 -3.962738
## [697,] 33.08699 -3.966058
## [698,] 33.10153 -3.965312
## [699,] 33.12018 -3.961988
## [700,] 33.13432 -3.957633
## [701,] 33.14213 -3.961583
## [702,] 33.15085 -3.959291
## [703,] 33.15650 -3.962325
## [704,] 33.17936 -3.959400
## [705,] 33.18723 -3.956649
## [706,] 33.19350 -3.949317
## [707,] 33.20118 -3.950637
## [708,] 33.20727 -3.956816
## [709,] 33.21846 -3.955145
## [710,] 33.21958 -3.944303
## [711,] 33.22423 -3.933567
## [712,] 33.22996 -3.931449
## [713,] 33.24454 -3.934069
## [714,] 33.26787 -3.916117
## [715,] 33.28110 -3.915097
## [716,] 33.30824 -3.905099
## [717,] 33.31489 -3.908821
## [718,] 33.32972 -3.899673
## [719,] 33.34592 -3.899805
## [720,] 33.35403 -3.893132
## [721,] 33.35968 -3.897238
## [722,] 33.37066 -3.890565
## [723,] 33.38154 -3.890360
## [724,] 33.38678 -3.893645
## [725,] 33.39694 -3.886870
## [726,] 33.40557 -3.889744
## [727,] 33.41285 -3.886972
## [728,] 33.41963 -3.897444
## [729,] 33.43647 -3.904322
## [730,] 33.43852 -3.909661
## [731,] 33.45176 -3.909179
## [732,] 33.46142 -3.900814
## [733,] 33.49480 -3.908140
## [734,] 33.50348 -3.904884
## [735,] 33.51813 -3.905698
## [736,] 33.52600 -3.896744
## [737,] 33.53784 -3.893245
## [738,] 33.54214 -3.896117
## [739,] 33.55619 -3.889965
## [740,] 33.56021 -3.882905
## [741,] 33.57766 -3.885348
## [742,] 33.58234 -3.880465
## [743,] 33.60012 -3.876684
## [744,] 33.60845 -3.882080
## [745,] 33.61903 -3.883640
## [746,] 33.62146 -3.879979
## [747,] 33.63672 -3.883801
## [748,] 33.65352 -3.892444
## [749,] 33.65843 -3.902847
## [750,] 33.64887 -3.920160
## [751,] 33.65589 -3.927437
## [752,] 33.67903 -3.937537
## [753,] 33.71522 -3.939978
## [754,] 33.72414 -3.943415
## [755,] 33.73580 -3.940189
## [756,] 33.75501 -3.927481
## [757,] 33.76595 -3.935708
## [758,] 33.78600 -3.938268
## [759,] 33.79736 -3.951486
## [760,] 33.80837 -3.947897
## [761,] 33.81749 -3.951716
## [762,] 33.83057 -3.951952
## [763,] 33.83861 -3.955854
## [764,] 33.85120 -3.949781
## [765,] 33.86629 -3.950701
## [766,] 33.87720 -3.957054
## [767,] 33.89286 -3.955914
## [768,] 33.89612 -3.961245
## [769,] 33.90749 -3.958565
## [770,] 33.92137 -3.960843
## [771,] 33.92502 -3.958328
## [772,] 33.93317 -3.966090
## [773,] 33.93630 -3.974407
## [774,] 33.94446 -3.975660
## [775,] 33.95097 -3.997145
## [776,] 33.96756 -4.006822
## [777,] 33.98632 -4.020738
## [778,] 34.01490 -4.025475
## [779,] 34.02522 -4.032561
## [780,] 34.04291 -4.038794
## [781,] 34.06264 -4.031373
## [782,] 34.07250 -4.031212
## [783,] 34.08471 -4.023949
## [784,] 34.09119 -4.024384
## [785,] 34.10785 -4.039447
## [786,] 34.11301 -4.040623
## [787,] 34.12378 -4.053326
## [788,] 34.13246 -4.052279
## [789,] 34.13866 -4.058186
## [790,] 34.17373 -4.077065
## [791,] 34.17274 -4.081177
## [792,] 34.14722 -4.087025
## [793,] 34.13738 -4.095001
## [794,] 34.11877 -4.118928
## [795,] 34.10468 -4.146842
## [796,] 34.10122 -4.168377
## [797,] 34.10202 -4.178479
## [798,] 34.09750 -4.209052
## [799,] 34.09552 -4.242656
## [800,] 34.08925 -4.272996
## [801,] 34.08342 -4.287091
## [802,] 34.08068 -4.299652
## [803,] 34.07918 -4.327073
## [804,] 34.07661 -4.340695
## [805,] 34.06408 -4.361526
## [806,] 34.06162 -4.373771
## [807,] 34.05487 -4.391743
## [808,] 34.04163 -4.408837
## [809,] 34.01643 -4.428809
## [810,] 34.00087 -4.431981
## [811,] 33.99639 -4.436795
## [812,] 33.97803 -4.448678
## [813,] 33.96544 -4.465471
## [814,] 33.94036 -4.511812
## [815,] 33.93902 -4.533866
## [816,] 33.93510 -4.548733
## [817,] 33.93543 -4.558898
## [818,] 33.93099 -4.566511
## [819,] 33.93189 -4.576064
## [820,] 33.91547 -4.597991
## [821,] 33.91455 -4.619628
## [822,] 33.92072 -4.636271
## [823,] 33.91957 -4.653488
## [824,] 33.92344 -4.675727
## [825,] 33.92269 -4.710196
## [826,] 33.93042 -4.718516
## [827,] 33.92943 -4.723293
## [828,] 33.93779 -4.748899
## [829,] 33.93009 -4.762186
## [830,] 33.92950 -4.779386
## [831,] 33.93124 -4.795647
## [832,] 33.92840 -4.814583
## [833,] 33.92445 -4.827074
## [834,] 33.91832 -4.836199
## [835,] 33.91596 -4.845566
## [836,] 33.91917 -4.860223
## [837,] 33.91831 -4.890985
## [838,] 33.91375 -4.910089
## [839,] 33.91551 -4.938095
## [840,] 33.92687 -4.980339
## [841,] 33.92375 -5.004245
## [842,] 33.92606 -5.015865
## [843,] 33.92473 -5.034717
## [844,] 33.92548 -5.067940
## [845,] 33.92829 -5.086664
## [846,] 33.92539 -5.125272
## [847,] 33.92684 -5.132745
## [848,] 33.92510 -5.146341
## [849,] 33.92883 -5.151058
## [850,] 33.93816 -5.172482
## [851,] 33.95331 -5.171392
## [852,] 33.96938 -5.180197
## [853,] 33.98652 -5.194298
## [854,] 34.00161 -5.203432
## [855,] 34.01308 -5.202880
## [856,] 34.02832 -5.206510
## [857,] 34.03843 -5.204564
## [858,] 34.04588 -5.198966
## [859,] 34.06225 -5.193847
## [860,] 34.07524 -5.195098
## [861,] 34.09068 -5.192977
## [862,] 34.11627 -5.191904
## 
## 
## 
## Slot "plotOrder":
## [1] 1
## 
## Slot "labpt":
## [1] 32.821628 -5.263664
## 
## Slot "ID":
## [1] "1"
## 
## Slot "area":
## [1] 6.150522
## 
## 
## [[3]]
## An object of class "Polygons"
## Slot "Polygons":
## [[1]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 39.742126 -5.311371
## 
## Slot "area":
## [1] 0.03611974
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##            [,1]      [,2]
##   [1,] 39.74648 -5.170733
##   [2,] 39.76529 -5.158530
##   [3,] 39.78913 -5.162991
##   [4,] 39.79135 -5.177034
##   [5,] 39.79039 -5.198833
##   [6,] 39.79798 -5.202969
##   [7,] 39.81557 -5.200822
##   [8,] 39.81943 -5.193290
##   [9,] 39.82795 -5.191710
##  [10,] 39.85569 -5.191815
##  [11,] 39.85306 -5.210568
##  [12,] 39.84721 -5.219651
##  [13,] 39.84700 -5.233965
##  [14,] 39.84266 -5.249153
##  [15,] 39.82928 -5.272123
##  [16,] 39.83518 -5.275726
##  [17,] 39.82892 -5.296308
##  [18,] 39.81977 -5.320493
##  [19,] 39.80084 -5.334639
##  [20,] 39.80290 -5.346047
##  [21,] 39.80936 -5.355162
##  [22,] 39.80906 -5.364305
##  [23,] 39.79832 -5.369109
##  [24,] 39.78356 -5.381322
##  [25,] 39.77793 -5.388330
##  [26,] 39.77074 -5.400448
##  [27,] 39.76758 -5.401633
##  [28,] 39.76649 -5.407314
##  [29,] 39.75803 -5.410096
##  [30,] 39.76658 -5.413745
##  [31,] 39.76757 -5.419278
##  [32,] 39.77050 -5.418594
##  [33,] 39.77204 -5.423816
##  [34,] 39.76290 -5.435404
##  [35,] 39.75242 -5.443002
##  [36,] 39.74718 -5.439866
##  [37,] 39.74190 -5.439760
##  [38,] 39.74174 -5.437746
##  [39,] 39.73890 -5.431745
##  [40,] 39.72908 -5.439775
##  [41,] 39.71793 -5.430621
##  [42,] 39.70557 -5.437642
##  [43,] 39.71483 -5.447194
##  [44,] 39.70656 -5.455757
##  [45,] 39.69780 -5.442534
##  [46,] 39.69113 -5.442071
##  [47,] 39.68289 -5.433169
##  [48,] 39.67100 -5.430326
##  [49,] 39.66541 -5.433344
##  [50,] 39.64389 -5.436892
##  [51,] 39.63688 -5.432526
##  [52,] 39.63077 -5.410514
##  [53,] 39.63263 -5.393882
##  [54,] 39.64112 -5.386505
##  [55,] 39.64372 -5.378988
##  [56,] 39.63946 -5.371185
##  [57,] 39.64454 -5.362268
##  [58,] 39.64146 -5.349168
##  [59,] 39.64361 -5.338693
##  [60,] 39.65546 -5.327631
##  [61,] 39.66317 -5.335281
##  [62,] 39.67388 -5.339399
##  [63,] 39.68184 -5.335557
##  [64,] 39.67743 -5.321787
##  [65,] 39.67247 -5.315371
##  [66,] 39.66236 -5.295473
##  [67,] 39.65396 -5.289117
##  [68,] 39.66630 -5.284189
##  [69,] 39.67605 -5.290551
##  [70,] 39.68502 -5.290051
##  [71,] 39.68900 -5.283132
##  [72,] 39.69594 -5.280371
##  [73,] 39.68970 -5.272393
##  [74,] 39.69114 -5.266237
##  [75,] 39.68653 -5.254309
##  [76,] 39.69735 -5.256294
##  [77,] 39.71065 -5.255334
##  [78,] 39.72174 -5.245463
##  [79,] 39.72837 -5.242571
##  [80,] 39.74745 -5.251476
##  [81,] 39.75517 -5.248050
##  [82,] 39.75515 -5.241770
##  [83,] 39.74594 -5.238378
##  [84,] 39.73591 -5.239115
##  [85,] 39.72510 -5.235136
##  [86,] 39.70862 -5.224562
##  [87,] 39.69838 -5.215770
##  [88,] 39.68797 -5.215384
##  [89,] 39.67565 -5.218260
##  [90,] 39.64800 -5.201453
##  [91,] 39.64886 -5.187426
##  [92,] 39.65488 -5.187260
##  [93,] 39.66458 -5.198599
##  [94,] 39.66371 -5.206586
##  [95,] 39.67448 -5.214162
##  [96,] 39.70498 -5.206381
##  [97,] 39.71936 -5.211521
##  [98,] 39.72365 -5.205714
##  [99,] 39.74085 -5.205205
## [100,] 39.74603 -5.197594
## [101,] 39.73436 -5.187701
## [102,] 39.74551 -5.184170
## [103,] 39.74967 -5.174049
## [104,] 39.74648 -5.170733
## 
## 
## [[2]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 39.780412 -5.400988
## 
## Slot "area":
## [1] 0.0005633397
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##           [,1]      [,2]
##  [1,] 39.79255 -5.378284
##  [2,] 39.79416 -5.395442
##  [3,] 39.77432 -5.421350
##  [4,] 39.77037 -5.417912
##  [5,] 39.76800 -5.417654
##  [6,] 39.76704 -5.413235
##  [7,] 39.76411 -5.409297
##  [8,] 39.76697 -5.407529
##  [9,] 39.76832 -5.402704
## [10,] 39.77351 -5.399410
## [11,] 39.77635 -5.392875
## [12,] 39.79255 -5.378284
## 
## 
## [[3]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 39.733490 -5.447825
## 
## Slot "area":
## [1] 0.000250099
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##           [,1]      [,2]
##  [1,] 39.73898 -5.433445
##  [2,] 39.74104 -5.437053
##  [3,] 39.74084 -5.438908
##  [4,] 39.74310 -5.441237
##  [5,] 39.73883 -5.451720
##  [6,] 39.72616 -5.461675
##  [7,] 39.72063 -5.453801
##  [8,] 39.73143 -5.449990
##  [9,] 39.73100 -5.439027
## [10,] 39.73898 -5.433445
## 
## 
## [[4]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 39.621166 -5.448058
## 
## Slot "area":
## [1] 0.001572178
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##           [,1]      [,2]
##  [1,] 39.58486 -5.410839
##  [2,] 39.59202 -5.417794
##  [3,] 39.60272 -5.418380
##  [4,] 39.60873 -5.431077
##  [5,] 39.61745 -5.428312
##  [6,] 39.61886 -5.438368
##  [7,] 39.61346 -5.443557
##  [8,] 39.61849 -5.449886
##  [9,] 39.62577 -5.443289
## [10,] 39.63448 -5.446912
## [11,] 39.64655 -5.448104
## [12,] 39.65542 -5.456926
## [13,] 39.64993 -5.469071
## [14,] 39.64690 -5.485404
## [15,] 39.64128 -5.479374
## [16,] 39.63260 -5.481074
## [17,] 39.63356 -5.469561
## [18,] 39.62772 -5.463319
## [19,] 39.61733 -5.461783
## [20,] 39.61571 -5.453862
## [21,] 39.60226 -5.449844
## [22,] 39.60106 -5.437587
## [23,] 39.59189 -5.428800
## [24,] 39.57422 -5.416620
## [25,] 39.58486 -5.410839
## 
## 
## [[5]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 39.619322 -5.378541
## 
## Slot "area":
## [1] 0.0002316594
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##          [,1]      [,2]
## [1,] 39.61306 -5.369552
## [2,] 39.62965 -5.378411
## [3,] 39.63211 -5.384803
## [4,] 39.62357 -5.388639
## [5,] 39.61588 -5.378918
## [6,] 39.60638 -5.379037
## [7,] 39.60643 -5.372706
## [8,] 39.61306 -5.369552
## 
## 
## 
## Slot "plotOrder":
## [1] 1 4 2 3 5
## 
## Slot "labpt":
## [1] 39.742126 -5.311371
## 
## Slot "ID":
## [1] "2"
## 
## Slot "area":
## [1] 0.03873702
## 
## 
## [[4]]
## An object of class "Polygons"
## Slot "Polygons":
## [[1]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 34.396130 -1.852639
## 
## Slot "area":
## [1] 1.712672
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##            [,1]      [,2]
##   [1,] 35.25607 -1.686969
##   [2,] 35.24890 -1.736109
##   [3,] 35.24753 -1.763349
##   [4,] 35.24610 -1.764458
##   [5,] 35.24109 -1.809129
##   [6,] 35.23906 -1.839061
##   [7,] 35.23369 -1.867157
##   [8,] 35.22861 -1.918916
##   [9,] 35.22130 -1.978426
##  [10,] 35.21802 -1.999663
##  [11,] 35.21050 -2.066492
##  [12,] 35.22825 -2.135826
##  [13,] 35.23278 -2.163153
##  [14,] 35.23562 -2.162929
##  [15,] 35.26583 -2.300004
##  [16,] 35.26592 -2.355335
##  [17,] 35.16020 -2.391448
##  [18,] 35.20637 -2.485069
##  [19,] 35.21749 -2.497555
##  [20,] 35.14057 -2.497947
##  [21,] 35.09783 -2.496545
##  [22,] 35.07761 -2.497523
##  [23,] 35.03246 -2.492865
##  [24,] 35.00659 -2.487229
##  [25,] 34.98969 -2.485634
##  [26,] 34.94394 -2.485703
##  [27,] 34.92687 -2.486851
##  [28,] 34.89160 -2.483983
##  [29,] 34.88301 -2.486353
##  [30,] 34.85433 -2.485608
##  [31,] 34.77509 -2.486840
##  [32,] 34.76638 -2.480116
##  [33,] 34.74283 -2.478127
##  [34,] 34.72765 -2.481627
##  [35,] 34.70913 -2.481539
##  [36,] 34.68335 -2.487186
##  [37,] 34.67621 -2.486858
##  [38,] 34.65568 -2.491038
##  [39,] 34.64172 -2.486677
##  [40,] 34.63146 -2.489945
##  [41,] 34.60801 -2.483912
##  [42,] 34.58849 -2.488763
##  [43,] 34.58067 -2.485068
##  [44,] 34.56550 -2.490475
##  [45,] 34.54027 -2.486014
##  [46,] 34.53447 -2.489277
##  [47,] 34.52631 -2.486928
##  [48,] 34.51596 -2.489658
##  [49,] 34.48813 -2.489417
##  [50,] 34.47361 -2.470932
##  [51,] 34.45919 -2.460875
##  [52,] 34.45241 -2.452817
##  [53,] 34.45301 -2.446819
##  [54,] 34.43229 -2.438822
##  [55,] 34.41848 -2.430582
##  [56,] 34.40085 -2.405560
##  [57,] 34.39927 -2.397987
##  [58,] 34.38849 -2.396714
##  [59,] 34.37338 -2.386965
##  [60,] 34.35965 -2.387680
##  [61,] 34.35564 -2.374134
##  [62,] 34.34930 -2.374134
##  [63,] 34.32525 -2.365315
##  [64,] 34.31591 -2.356364
##  [65,] 34.30767 -2.341501
##  [66,] 34.30630 -2.335038
##  [67,] 34.29798 -2.321467
##  [68,] 34.29806 -2.312069
##  [69,] 34.28621 -2.305283
##  [70,] 34.26790 -2.302375
##  [71,] 34.26262 -2.308730
##  [72,] 34.25411 -2.310023
##  [73,] 34.24786 -2.304745
##  [74,] 34.23935 -2.303129
##  [75,] 34.22794 -2.306576
##  [76,] 34.22137 -2.300437
##  [77,] 34.19961 -2.291526
##  [78,] 34.18781 -2.277633
##  [79,] 34.17492 -2.271236
##  [80,] 34.17482 -2.263040
##  [81,] 34.16232 -2.254444
##  [82,] 34.14603 -2.256543
##  [83,] 34.13484 -2.265438
##  [84,] 34.11945 -2.268337
##  [85,] 34.10705 -2.264439
##  [86,] 34.10105 -2.258242
##  [87,] 34.08726 -2.258742
##  [88,] 34.08256 -2.250346
##  [89,] 34.06207 -2.237252
##  [90,] 34.06017 -2.230155
##  [91,] 34.04786 -2.217363
##  [92,] 34.03758 -2.214271
##  [93,] 34.02950 -2.207679
##  [94,] 34.01740 -2.202417
##  [95,] 34.01630 -2.197208
##  [96,] 34.00349 -2.192692
##  [97,] 33.98904 -2.181871
##  [98,] 33.97487 -2.183114
##  [99,] 33.96057 -2.189979
## [100,] 33.94340 -2.191086
## [101,] 33.92881 -2.183006
## [102,] 33.90659 -2.178633
## [103,] 33.89965 -2.179322
## [104,] 33.87962 -2.191263
## [105,] 33.86095 -2.193467
## [106,] 33.84694 -2.197471
## [107,] 33.84361 -2.192890
## [108,] 33.83254 -2.196247
## [109,] 33.83239 -2.186993
## [110,] 33.83719 -2.184111
## [111,] 33.83749 -2.174341
## [112,] 33.83108 -2.153851
## [113,] 33.83171 -2.128939
## [114,] 33.82664 -2.117142
## [115,] 33.81825 -2.109484
## [116,] 33.80541 -2.111010
## [117,] 33.79934 -2.091442
## [118,] 33.79965 -2.081388
## [119,] 33.79097 -2.069815
## [120,] 33.77700 -2.065842
## [121,] 33.76416 -2.065890
## [122,] 33.73793 -2.079765
## [123,] 33.72702 -2.089358
## [124,] 33.71259 -2.113356
## [125,] 33.69280 -2.119178
## [126,] 33.67953 -2.132066
## [127,] 33.67348 -2.131073
## [128,] 33.66234 -2.141800
## [129,] 33.65072 -2.140956
## [130,] 33.63996 -2.146444
## [131,] 33.63348 -2.154398
## [132,] 33.62594 -2.180456
## [133,] 33.61735 -2.182105
## [134,] 33.61136 -2.187317
## [135,] 33.60100 -2.175117
## [136,] 33.59405 -2.179920
## [137,] 33.58423 -2.171970
## [138,] 33.57442 -2.167862
## [139,] 33.55111 -2.165295
## [140,] 33.54716 -2.166393
## [141,] 33.51826 -2.161057
## [142,] 33.50586 -2.161609
## [143,] 33.48869 -2.156542
## [144,] 33.46361 -2.153944
## [145,] 33.44358 -2.156281
## [146,] 33.42817 -2.151455
## [147,] 33.41236 -2.153608
## [148,] 33.39393 -2.169752
## [149,] 33.38572 -2.162811
## [150,] 33.37106 -2.163597
## [151,] 33.35933 -2.172451
## [152,] 33.34902 -2.169502
## [153,] 33.34799 -2.159914
## [154,] 33.33540 -2.135118
## [155,] 33.32221 -2.124323
## [156,] 33.31444 -2.122988
## [157,] 33.30892 -2.117538
## [158,] 33.30343 -2.104967
## [159,] 33.28616 -2.107347
## [160,] 33.27328 -2.094971
## [161,] 33.24982 -2.098215
## [162,] 33.22712 -2.118986
## [163,] 33.22108 -2.131424
## [164,] 33.22051 -2.145191
## [165,] 33.21026 -2.139351
## [166,] 33.20871 -2.126856
## [167,] 33.21470 -2.122255
## [168,] 33.20674 -2.104946
## [169,] 33.20561 -2.096844
## [170,] 33.21658 -2.082009
## [171,] 33.23091 -2.073542
## [172,] 33.23395 -2.068856
## [173,] 33.22579 -2.055435
## [174,] 33.21245 -2.046877
## [175,] 33.21107 -2.033572
## [176,] 33.21825 -2.031720
## [177,] 33.22463 -2.037214
## [178,] 33.22820 -2.046990
## [179,] 33.24045 -2.053872
## [180,] 33.25189 -2.052366
## [181,] 33.25735 -2.045134
## [182,] 33.26994 -2.041662
## [183,] 33.28834 -2.058130
## [184,] 33.29968 -2.074007
## [185,] 33.30572 -2.070013
## [186,] 33.29230 -2.033052
## [187,] 33.29379 -2.021135
## [188,] 33.27999 -2.014248
## [189,] 33.27253 -1.998411
## [190,] 33.29031 -1.987200
## [191,] 33.29655 -1.994191
## [192,] 33.29379 -2.003859
## [193,] 33.29686 -2.008898
## [194,] 33.29768 -2.021753
## [195,] 33.30238 -2.023397
## [196,] 33.30494 -2.037383
## [197,] 33.31097 -2.044992
## [198,] 33.32572 -2.045280
## [199,] 33.32870 -2.042242
## [200,] 33.32343 -2.026066
## [201,] 33.32466 -2.018765
## [202,] 33.34101 -2.010740
## [203,] 33.34827 -2.015881
## [204,] 33.35185 -2.025753
## [205,] 33.35849 -2.028528
## [206,] 33.37311 -2.046419
## [207,] 33.38292 -2.041274
## [208,] 33.39263 -2.043637
## [209,] 33.40503 -2.038881
## [210,] 33.38428 -2.012238
## [211,] 33.38014 -1.997353
## [212,] 33.38151 -1.978225
## [213,] 33.39446 -1.969275
## [214,] 33.41278 -1.969348
## [215,] 33.42275 -1.972970
## [216,] 33.43379 -1.982069
## [217,] 33.45185 -1.990358
## [218,] 33.45185 -1.996940
## [219,] 33.46241 -2.007600
## [220,] 33.47935 -2.010603
## [221,] 33.48012 -2.019550
## [222,] 33.49278 -2.021637
## [223,] 33.50025 -2.016596
## [224,] 33.51987 -2.011448
## [225,] 33.52631 -2.026357
## [226,] 33.53377 -2.026972
## [227,] 33.54552 -2.015347
## [228,] 33.55620 -2.009240
## [229,] 33.56038 -1.998058
## [230,] 33.54493 -1.990762
## [231,] 33.53491 -1.989296
## [232,] 33.53054 -1.978633
## [233,] 33.53830 -1.971386
## [234,] 33.53354 -1.959278
## [235,] 33.52257 -1.960531
## [236,] 33.51333 -1.958319
## [237,] 33.50003 -1.963108
## [238,] 33.49518 -1.955353
## [239,] 33.48219 -1.953491
## [240,] 33.46772 -1.948641
## [241,] 33.47551 -1.937065
## [242,] 33.48961 -1.929967
## [243,] 33.48812 -1.918394
## [244,] 33.47998 -1.915182
## [245,] 33.47230 -1.903528
## [246,] 33.45728 -1.903374
## [247,] 33.45618 -1.888411
## [248,] 33.45117 -1.881481
## [249,] 33.43630 -1.885265
## [250,] 33.43066 -1.891568
## [251,] 33.42973 -1.899286
## [252,] 33.41423 -1.898030
## [253,] 33.40594 -1.903702
## [254,] 33.39921 -1.903704
## [255,] 33.37588 -1.913790
## [256,] 33.36650 -1.923872
## [257,] 33.35231 -1.923923
## [258,] 33.33576 -1.941824
## [259,] 33.32590 -1.948294
## [260,] 33.31067 -1.948917
## [261,] 33.29957 -1.946882
## [262,] 33.28786 -1.937138
## [263,] 33.29138 -1.920481
## [264,] 33.30379 -1.913656
## [265,] 33.31717 -1.901604
## [266,] 33.31691 -1.885389
## [267,] 33.32342 -1.855972
## [268,] 33.31972 -1.852163
## [269,] 33.33195 -1.831252
## [270,] 33.34833 -1.821060
## [271,] 33.36391 -1.808121
## [272,] 33.37359 -1.796601
## [273,] 33.38054 -1.795448
## [274,] 33.39824 -1.799342
## [275,] 33.41488 -1.809528
## [276,] 33.42325 -1.809614
## [277,] 33.43997 -1.797295
## [278,] 33.44411 -1.837738
## [279,] 33.46091 -1.844171
## [280,] 33.47564 -1.844817
## [281,] 33.49480 -1.841447
## [282,] 33.50959 -1.834245
## [283,] 33.52089 -1.826721
## [284,] 33.52392 -1.816078
## [285,] 33.53701 -1.817801
## [286,] 33.55063 -1.809406
## [287,] 33.56469 -1.794848
## [288,] 33.56140 -1.789087
## [289,] 33.56861 -1.774200
## [290,] 33.56914 -1.764011
## [291,] 33.57856 -1.760643
## [292,] 33.58331 -1.767552
## [293,] 33.59863 -1.761434
## [294,] 33.61765 -1.777818
## [295,] 33.63532 -1.783341
## [296,] 33.64876 -1.783872
## [297,] 33.65637 -1.774538
## [298,] 33.65782 -1.762966
## [299,] 33.64890 -1.760921
## [300,] 33.64191 -1.748165
## [301,] 33.62915 -1.748865
## [302,] 33.61583 -1.737097
## [303,] 33.60488 -1.734964
## [304,] 33.59699 -1.733519
## [305,] 33.58971 -1.723836
## [306,] 33.58524 -1.712851
## [307,] 33.56764 -1.708199
## [308,] 33.56816 -1.697998
## [309,] 33.56449 -1.692722
## [310,] 33.55383 -1.692373
## [311,] 33.54089 -1.685869
## [312,] 33.54037 -1.674614
## [313,] 33.54875 -1.675139
## [314,] 33.55994 -1.671442
## [315,] 33.56815 -1.682872
## [316,] 33.58397 -1.681205
## [317,] 33.60190 -1.682132
## [318,] 33.61671 -1.674596
## [319,] 33.62738 -1.666281
## [320,] 33.63748 -1.671422
## [321,] 33.64678 -1.672870
## [322,] 33.65324 -1.683943
## [323,] 33.66474 -1.680646
## [324,] 33.67017 -1.674689
## [325,] 33.68520 -1.679646
## [326,] 33.69995 -1.682212
## [327,] 33.70368 -1.679571
## [328,] 33.71184 -1.655416
## [329,] 33.70921 -1.644188
## [330,] 33.69599 -1.637775
## [331,] 33.68624 -1.643158
## [332,] 33.67564 -1.638443
## [333,] 33.66982 -1.628725
## [334,] 33.69317 -1.630416
## [335,] 33.69832 -1.620127
## [336,] 33.69467 -1.615503
## [337,] 33.69541 -1.603424
## [338,] 33.69053 -1.598801
## [339,] 33.67881 -1.599655
## [340,] 33.67444 -1.591900
## [341,] 33.66010 -1.592377
## [342,] 33.64847 -1.587757
## [343,] 33.65053 -1.581244
## [344,] 33.64556 -1.569166
## [345,] 33.63018 -1.568133
## [346,] 33.62577 -1.576721
## [347,] 33.61921 -1.567286
## [348,] 33.62727 -1.558413
## [349,] 33.63205 -1.562848
## [350,] 33.64405 -1.562844
## [351,] 33.65277 -1.557556
## [352,] 33.65615 -1.562085
## [353,] 33.66656 -1.557364
## [354,] 33.67771 -1.557171
## [355,] 33.68633 -1.541502
## [356,] 33.69383 -1.517540
## [357,] 33.69066 -1.509273
## [358,] 33.68035 -1.509909
## [359,] 33.66823 -1.507389
## [360,] 33.66232 -1.489462
## [361,] 33.64670 -1.488205
## [362,] 33.64706 -1.478005
## [363,] 33.65657 -1.481052
## [364,] 33.66754 -1.479050
## [365,] 33.67778 -1.467112
## [366,] 33.69047 -1.469579
## [367,] 33.69434 -1.478358
## [368,] 33.70421 -1.481247
## [369,] 33.70680 -1.488187
## [370,] 33.72784 -1.495400
## [371,] 33.73578 -1.494415
## [372,] 33.74409 -1.483353
## [373,] 33.75941 -1.481240
## [374,] 33.76173 -1.486559
## [375,] 33.77766 -1.494063
## [376,] 33.78975 -1.495245
## [377,] 33.79841 -1.491436
## [378,] 33.80746 -1.478209
## [379,] 33.81133 -1.494246
## [380,] 33.81687 -1.496269
## [381,] 33.82255 -1.514267
## [382,] 33.82873 -1.522165
## [383,] 33.85321 -1.524189
## [384,] 33.85444 -1.531409
## [385,] 33.88493 -1.523518
## [386,] 33.90134 -1.531721
## [387,] 33.91635 -1.536810
## [388,] 33.93453 -1.516701
## [389,] 33.93232 -1.510235
## [390,] 33.94046 -1.501419
## [391,] 33.93972 -1.495308
## [392,] 33.92647 -1.490625
## [393,] 33.90804 -1.497927
## [394,] 33.90149 -1.506069
## [395,] 33.89505 -1.502941
## [396,] 33.89133 -1.482994
## [397,] 33.88497 -1.476269
## [398,] 33.87066 -1.478880
## [399,] 33.86161 -1.473246
## [400,] 33.85974 -1.460056
## [401,] 33.85420 -1.453795
## [402,] 33.85256 -1.437836
## [403,] 33.84037 -1.430092
## [404,] 33.83054 -1.429569
## [405,] 33.82180 -1.438244
## [406,] 33.81655 -1.434915
## [407,] 33.80424 -1.440063
## [408,] 33.78779 -1.438223
## [409,] 33.78288 -1.430805
## [410,] 33.77864 -1.402977
## [411,] 33.79666 -1.395816
## [412,] 33.80589 -1.389944
## [413,] 33.80897 -1.396900
## [414,] 33.81708 -1.400671
## [415,] 33.81435 -1.407120
## [416,] 33.82012 -1.413683
## [417,] 33.82734 -1.407936
## [418,] 33.84300 -1.410803
## [419,] 33.85302 -1.405933
## [420,] 33.85173 -1.396730
## [421,] 33.83228 -1.389704
## [422,] 33.81959 -1.392580
## [423,] 33.82802 -1.378920
## [424,] 33.81620 -1.375582
## [425,] 33.80956 -1.362043
## [426,] 33.81334 -1.351725
## [427,] 33.80117 -1.355188
## [428,] 33.79680 -1.352434
## [429,] 33.79401 -1.342378
## [430,] 33.79957 -1.325726
## [431,] 33.82012 -1.328571
## [432,] 33.82775 -1.332838
## [433,] 33.84794 -1.321551
## [434,] 33.86519 -1.326872
## [435,] 33.86932 -1.320986
## [436,] 33.89841 -1.323730
## [437,] 33.91981 -1.338495
## [438,] 33.92544 -1.333261
## [439,] 33.93773 -1.336026
## [440,] 33.93526 -1.345528
## [441,] 33.94036 -1.347918
## [442,] 33.94957 -1.336494
## [443,] 33.95726 -1.335991
## [444,] 33.97587 -1.346082
## [445,] 33.98595 -1.339832
## [446,] 33.97589 -1.323853
## [447,] 33.96268 -1.319950
## [448,] 33.95704 -1.315710
## [449,] 33.95666 -1.304554
## [450,] 33.95032 -1.299354
## [451,] 33.93983 -1.302195
## [452,] 33.93614 -1.296313
## [453,] 33.93685 -1.286687
## [454,] 33.92609 -1.292019
## [455,] 33.92109 -1.290323
## [456,] 33.89651 -1.290485
## [457,] 33.89390 -1.279190
## [458,] 33.88935 -1.272251
## [459,] 33.88370 -1.273852
## [460,] 33.87023 -1.269766
## [461,] 33.86643 -1.254023
## [462,] 33.87263 -1.246649
## [463,] 33.87161 -1.239303
## [464,] 33.87810 -1.223959
## [465,] 33.87879 -1.216698
## [466,] 33.88822 -1.216570
## [467,] 33.89918 -1.205702
## [468,] 33.91092 -1.208007
## [469,] 33.92100 -1.195485
## [470,] 33.93706 -1.193880
## [471,] 33.95108 -1.183901
## [472,] 33.95698 -1.187585
## [473,] 33.96508 -1.180266
## [474,] 33.96316 -1.175787
## [475,] 33.96814 -1.166146
## [476,] 33.97455 -1.170233
## [477,] 33.98584 -1.167433
## [478,] 33.99331 -1.150627
## [479,] 34.00813 -1.138980
## [480,] 34.00659 -1.127533
## [481,] 34.00148 -1.123251
## [482,] 33.99192 -1.127300
## [483,] 33.98866 -1.123796
## [484,] 33.97445 -1.125805
## [485,] 33.96988 -1.122969
## [486,] 33.97375 -1.114428
## [487,] 33.97048 -1.106680
## [488,] 33.98963 -1.099914
## [489,] 33.99548 -1.109565
## [490,] 33.99980 -1.097281
## [491,] 34.00731 -1.090769
## [492,] 34.01816 -1.100849
## [493,] 34.02045 -1.109070
## [494,] 34.02875 -1.105047
## [495,] 34.02789 -1.089942
## [496,] 34.04411 -1.094721
## [497,] 34.04994 -1.086651
## [498,] 34.05274 -1.075564
## [499,] 34.05904 -1.077774
## [500,] 34.06487 -1.071860
## [501,] 34.06506 -1.064321
## [502,] 34.07516 -1.062658
## [503,] 34.07921 -1.045019
## [504,] 34.07616 -1.034700
## [505,] 34.08703 -1.034893
## [506,] 34.09392 -1.027046
## [507,] 34.27582 -1.129923
## [508,] 34.37666 -1.186245
## [509,] 34.38112 -1.189107
## [510,] 34.55834 -1.289164
## [511,] 34.75001 -1.397342
## [512,] 34.78303 -1.416299
## [513,] 34.92054 -1.503247
## [514,] 34.94921 -1.520308
## [515,] 34.96821 -1.535185
## [516,] 34.98964 -1.549473
## [517,] 34.99811 -1.557915
## [518,] 35.03048 -1.581843
## [519,] 35.07184 -1.602651
## [520,] 35.15622 -1.648205
## [521,] 35.16412 -1.650934
## [522,] 35.18076 -1.661000
## [523,] 35.22277 -1.678035
## [524,] 35.25607 -1.686969
## 
## 
## [[2]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 33.769085 -1.384515
## 
## Slot "area":
## [1] 0.0001011652
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##          [,1]      [,2]
## [1,] 33.77242 -1.378175
## [2,] 33.77586 -1.388973
## [3,] 33.76376 -1.388838
## [4,] 33.76245 -1.382124
## [5,] 33.77242 -1.378175
## 
## 
## [[3]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 33.704776 -1.397567
## 
## Slot "area":
## [1] 0.0001384765
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##          [,1]      [,2]
## [1,] 33.70921 -1.389755
## [2,] 33.71126 -1.395195
## [3,] 33.70769 -1.403736
## [4,] 33.69974 -1.405513
## [5,] 33.69850 -1.398348
## [6,] 33.70295 -1.390650
## [7,] 33.70921 -1.389755
## 
## 
## [[4]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 33.289895 -2.200515
## 
## Slot "area":
## [1] 0.001037237
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##           [,1]      [,2]
##  [1,] 33.30477 -2.174930
##  [2,] 33.30766 -2.180222
##  [3,] 33.30010 -2.213747
##  [4,] 33.28846 -2.221863
##  [5,] 33.26893 -2.216919
##  [6,] 33.27246 -2.211452
##  [7,] 33.27259 -2.195400
##  [8,] 33.29044 -2.189323
##  [9,] 33.29575 -2.174599
## [10,] 33.30477 -2.174930
## 
## 
## 
## Slot "plotOrder":
## [1] 1 4 3 2
## 
## Slot "labpt":
## [1] 34.396130 -1.852639
## 
## Slot "ID":
## [1] "3"
## 
## Slot "area":
## [1] 1.713949
## 
## 
## [[5]]
## An object of class "Polygons"
## Slot "Polygons":
## [[1]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 36.54808 -4.53372
## 
## Slot "area":
## [1] 3.78614
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##            [,1]      [,2]
##   [1,] 35.34037 -4.876764
##   [2,] 35.32249 -4.869096
##   [3,] 35.31013 -4.851436
##   [4,] 35.28342 -4.804103
##   [5,] 35.26883 -4.797168
##   [6,] 35.25181 -4.792514
##   [7,] 35.21889 -4.774431
##   [8,] 35.20155 -4.767178
##   [9,] 35.18002 -4.766435
##  [10,] 35.16056 -4.758375
##  [11,] 35.15294 -4.751577
##  [12,] 35.14429 -4.730002
##  [13,] 35.14260 -4.708404
##  [14,] 35.14557 -4.675527
##  [15,] 35.13939 -4.656843
##  [16,] 35.12772 -4.628556
##  [17,] 35.08993 -4.623964
##  [18,] 35.07298 -4.616152
##  [19,] 35.05962 -4.587641
##  [20,] 35.04295 -4.546773
##  [21,] 35.03198 -4.529702
##  [22,] 35.00077 -4.505606
##  [23,] 34.99009 -4.491472
##  [24,] 34.97772 -4.466571
##  [25,] 34.96551 -4.453357
##  [26,] 34.87477 -4.411220
##  [27,] 34.86631 -4.391780
##  [28,] 34.86808 -4.372621
##  [29,] 34.86569 -4.359682
##  [30,] 34.87709 -4.333237
##  [31,] 34.89771 -4.300434
##  [32,] 34.89910 -4.287053
##  [33,] 34.91074 -4.269609
##  [34,] 34.91545 -4.271062
##  [35,] 34.92725 -4.264452
##  [36,] 34.93595 -4.249909
##  [37,] 34.95409 -4.239743
##  [38,] 34.96121 -4.229831
##  [39,] 34.96998 -4.205733
##  [40,] 34.96853 -4.179957
##  [41,] 34.96983 -4.171568
##  [42,] 34.96418 -4.157613
##  [43,] 34.96983 -4.142266
##  [44,] 34.97034 -4.116529
##  [45,] 34.96593 -4.090037
##  [46,] 34.97822 -4.045601
##  [47,] 34.98200 -4.018183
##  [48,] 34.98484 -4.017237
##  [49,] 34.99025 -3.988383
##  [50,] 34.96080 -3.989907
##  [51,] 34.93611 -3.992303
##  [52,] 34.92459 -3.979984
##  [53,] 34.91164 -3.969071
##  [54,] 34.91087 -3.963894
##  [55,] 34.89996 -3.934029
##  [56,] 34.89120 -3.906394
##  [57,] 34.91114 -3.895279
##  [58,] 34.94732 -3.880734
##  [59,] 34.98305 -3.860909
##  [60,] 34.99095 -3.861599
##  [61,] 35.00596 -3.867486
##  [62,] 35.00927 -3.871699
##  [63,] 35.01763 -3.869049
##  [64,] 35.04143 -3.856587
##  [65,] 35.07106 -3.834194
##  [66,] 35.07095 -3.830176
##  [67,] 35.08706 -3.827725
##  [68,] 35.10795 -3.819367
##  [69,] 35.14000 -3.801257
##  [70,] 35.16554 -3.780360
##  [71,] 35.18968 -3.766894
##  [72,] 35.20408 -3.750641
##  [73,] 35.23612 -3.733459
##  [74,] 35.24159 -3.724199
##  [75,] 35.25299 -3.717218
##  [76,] 35.28220 -3.694041
##  [77,] 35.29210 -3.687282
##  [78,] 35.31456 -3.690179
##  [79,] 35.32856 -3.688489
##  [80,] 35.33459 -3.679556
##  [81,] 35.34570 -3.670141
##  [82,] 35.36236 -3.646240
##  [83,] 35.36837 -3.633393
##  [84,] 35.38523 -3.614793
##  [85,] 35.39391 -3.616743
##  [86,] 35.40149 -3.623446
##  [87,] 35.40979 -3.624578
##  [88,] 35.42207 -3.633758
##  [89,] 35.44246 -3.643114
##  [90,] 35.46479 -3.659291
##  [91,] 35.52292 -3.676300
##  [92,] 35.53991 -3.689605
##  [93,] 35.54663 -3.691386
##  [94,] 35.58118 -3.692644
##  [95,] 35.60622 -3.690292
##  [96,] 35.62406 -3.695455
##  [97,] 35.61165 -3.731498
##  [98,] 35.60169 -3.749194
##  [99,] 35.59123 -3.772938
## [100,] 35.62983 -3.766697
## [101,] 35.65667 -3.765795
## [102,] 35.66339 -3.763262
## [103,] 35.67891 -3.764070
## [104,] 35.68247 -3.743264
## [105,] 35.68701 -3.737798
## [106,] 35.68806 -3.720884
## [107,] 35.69414 -3.709705
## [108,] 35.70808 -3.651604
## [109,] 35.71262 -3.629125
## [110,] 35.71463 -3.607771
## [111,] 35.71520 -3.554502
## [112,] 35.72251 -3.554318
## [113,] 35.72509 -3.564820
## [114,] 35.75170 -3.565659
## [115,] 35.76509 -3.557712
## [116,] 35.77782 -3.558933
## [117,] 35.77644 -3.566663
## [118,] 35.75758 -3.587975
## [119,] 35.74180 -3.602470
## [120,] 35.73842 -3.610515
## [121,] 35.74665 -3.637724
## [122,] 35.75175 -3.644295
## [123,] 35.75820 -3.660325
## [124,] 35.75820 -3.677645
## [125,] 35.75169 -3.685507
## [126,] 35.74505 -3.687226
## [127,] 35.74327 -3.699080
## [128,] 35.74511 -3.725183
## [129,] 35.73701 -3.736054
## [130,] 35.73652 -3.748915
## [131,] 35.74696 -3.763016
## [132,] 35.74990 -3.796489
## [133,] 35.75907 -3.804089
## [134,] 35.76633 -3.802332
## [135,] 35.76876 -3.789356
## [136,] 35.78179 -3.779263
## [137,] 35.78862 -3.770240
## [138,] 35.80738 -3.760069
## [139,] 35.81668 -3.741040
## [140,] 35.83986 -3.708777
## [141,] 35.85561 -3.694232
## [142,] 35.87025 -3.670583
## [143,] 35.87291 -3.660118
## [144,] 35.87195 -3.644929
## [145,] 35.87309 -3.625737
## [146,] 35.88095 -3.641186
## [147,] 35.91076 -3.638095
## [148,] 35.93316 -3.637400
## [149,] 35.94155 -3.634763
## [150,] 35.96241 -3.649150
## [151,] 35.96841 -3.656823
## [152,] 35.98039 -3.654186
## [153,] 35.99298 -3.672635
## [154,] 36.00004 -3.686519
## [155,] 36.04206 -3.738401
## [156,] 36.12779 -3.842746
## [157,] 36.14840 -3.868735
## [158,] 36.18517 -3.946402
## [159,] 36.20377 -3.987319
## [160,] 36.25557 -4.094073
## [161,] 36.28078 -4.147840
## [162,] 36.29758 -4.142865
## [163,] 36.29531 -4.123978
## [164,] 36.29660 -4.108575
## [165,] 36.29468 -4.083994
## [166,] 36.29696 -4.073314
## [167,] 36.29515 -4.037832
## [168,] 36.29729 -4.025109
## [169,] 36.29841 -3.995952
## [170,] 36.29795 -3.960269
## [171,] 36.29284 -3.945416
## [172,] 36.29251 -3.917361
## [173,] 36.29383 -3.889636
## [174,] 36.29085 -3.856795
## [175,] 36.29548 -3.836992
## [176,] 36.29779 -3.802996
## [177,] 36.31033 -3.801180
## [178,] 36.34201 -3.801015
## [179,] 36.36563 -3.797287
## [180,] 36.39427 -3.795596
## [181,] 36.42104 -3.787644
## [182,] 36.44832 -3.785025
## [183,] 36.48100 -3.779396
## [184,] 36.49060 -3.773640
## [185,] 36.48881 -3.768650
## [186,] 36.49335 -3.760591
## [187,] 36.50902 -3.750337
## [188,] 36.51277 -3.743515
## [189,] 36.52846 -3.736464
## [190,] 36.53563 -3.729073
## [191,] 36.53733 -3.720999
## [192,] 36.55189 -3.709059
## [193,] 36.56247 -3.714062
## [194,] 36.56710 -3.709139
## [195,] 36.57685 -3.706213
## [196,] 36.58514 -3.694875
## [197,] 36.59380 -3.689267
## [198,] 36.60233 -3.689755
## [199,] 36.61014 -3.682684
## [200,] 36.61611 -3.671347
## [201,] 36.61940 -3.657815
## [202,] 36.61696 -3.648428
## [203,] 36.63316 -3.638854
## [204,] 36.63645 -3.633612
## [205,] 36.64940 -3.634267
## [206,] 36.66320 -3.620970
## [207,] 36.66403 -3.613497
## [208,] 36.67100 -3.609345
## [209,] 36.68448 -3.609513
## [210,] 36.68764 -3.613816
## [211,] 36.70169 -3.609083
## [212,] 36.69084 -3.594576
## [213,] 36.69117 -3.586673
## [214,] 36.70160 -3.577638
## [215,] 36.71376 -3.559889
## [216,] 36.71451 -3.551499
## [217,] 36.72699 -3.556124
## [218,] 36.74528 -3.571937
## [219,] 36.78368 -3.617760
## [220,] 36.79970 -3.642716
## [221,] 36.80067 -3.652397
## [222,] 36.83595 -3.646696
## [223,] 36.85489 -3.602808
## [224,] 36.86102 -3.583446
## [225,] 36.88479 -3.581941
## [226,] 36.89262 -3.595614
## [227,] 36.91948 -3.568288
## [228,] 36.92456 -3.570901
## [229,] 36.95738 -3.571533
## [230,] 36.96537 -3.570404
## [231,] 36.96633 -3.562844
## [232,] 36.98441 -3.536050
## [233,] 37.00365 -3.521758
## [234,] 37.01092 -3.509338
## [235,] 37.02140 -3.500008
## [236,] 37.06046 -3.490115
## [237,] 37.07142 -3.485781
## [238,] 37.08834 -3.487705
## [239,] 37.09831 -3.482578
## [240,] 37.10038 -3.477242
## [241,] 37.11167 -3.479665
## [242,] 37.12780 -3.479713
## [243,] 37.13753 -3.485071
## [244,] 37.15111 -3.464953
## [245,] 37.16063 -3.459512
## [246,] 37.16379 -3.452314
## [247,] 37.17478 -3.451612
## [248,] 37.18278 -3.458142
## [249,] 37.19405 -3.448487
## [250,] 37.20125 -3.452384
## [251,] 37.21108 -3.451752
## [252,] 37.22224 -3.469307
## [253,] 37.22291 -3.480647
## [254,] 37.22902 -3.486932
## [255,] 37.23780 -3.487037
## [256,] 37.26129 -3.495429
## [257,] 37.27724 -3.491031
## [258,] 37.28660 -3.496313
## [259,] 37.29260 -3.494683
## [260,] 37.30001 -3.499767
## [261,] 37.30258 -3.514376
## [262,] 37.29711 -3.529844
## [263,] 37.30176 -3.546248
## [264,] 37.30899 -3.551688
## [265,] 37.30551 -3.559662
## [266,] 37.31061 -3.563294
## [267,] 37.31193 -3.573499
## [268,] 37.32786 -3.588383
## [269,] 37.33324 -3.601561
## [270,] 37.33597 -3.614891
## [271,] 37.34138 -3.628356
## [272,] 37.35348 -3.640098
## [273,] 37.36805 -3.646464
## [274,] 37.37081 -3.652805
## [275,] 37.39892 -3.669365
## [276,] 37.41002 -3.688067
## [277,] 37.41107 -3.700378
## [278,] 37.42529 -3.735779
## [279,] 37.42741 -3.747922
## [280,] 37.44506 -3.779754
## [281,] 37.46225 -3.801123
## [282,] 37.46827 -3.823955
## [283,] 37.46093 -3.829533
## [284,] 37.45683 -3.852778
## [285,] 37.45147 -3.859340
## [286,] 37.45220 -3.866646
## [287,] 37.44941 -3.883236
## [288,] 37.46299 -3.887339
## [289,] 37.46104 -3.899307
## [290,] 37.46744 -3.913300
## [291,] 37.46472 -3.924531
## [292,] 37.45880 -3.927090
## [293,] 37.46616 -3.943486
## [294,] 37.46101 -3.947123
## [295,] 37.45950 -3.955608
## [296,] 37.46465 -3.967427
## [297,] 37.46247 -3.976739
## [298,] 37.46783 -3.986924
## [299,] 37.46997 -4.009345
## [300,] 37.47950 -4.018037
## [301,] 37.48314 -4.015915
## [302,] 37.49250 -4.029259
## [303,] 37.49438 -4.040058
## [304,] 37.49016 -4.049992
## [305,] 37.49711 -4.060919
## [306,] 37.50208 -4.061415
## [307,] 37.50804 -4.088981
## [308,] 37.50680 -4.096928
## [309,] 37.51276 -4.103385
## [310,] 37.51276 -4.138898
## [311,] 37.50730 -4.142871
## [312,] 37.50890 -4.150436
## [313,] 37.49562 -4.173169
## [314,] 37.50158 -4.174410
## [315,] 37.49811 -4.190801
## [316,] 37.49836 -4.210420
## [317,] 37.49438 -4.214642
## [318,] 37.49463 -4.225569
## [319,] 37.50283 -4.238731
## [320,] 37.50115 -4.255084
## [321,] 37.50409 -4.265241
## [322,] 37.51059 -4.270692
## [323,] 37.51285 -4.277994
## [324,] 37.49980 -4.305459
## [325,] 37.49366 -4.306170
## [326,] 37.49599 -4.319612
## [327,] 37.50387 -4.329435
## [328,] 37.50652 -4.338676
## [329,] 37.49095 -4.352958
## [330,] 37.49593 -4.371386
## [331,] 37.49175 -4.378511
## [332,] 37.49797 -4.389089
## [333,] 37.49833 -4.398249
## [334,] 37.50687 -4.403956
## [335,] 37.50593 -4.409227
## [336,] 37.53511 -4.450376
## [337,] 37.54670 -4.457339
## [338,] 37.55285 -4.467178
## [339,] 37.57021 -4.468178
## [340,] 37.57003 -4.474446
## [341,] 37.57952 -4.478535
## [342,] 37.59196 -4.493849
## [343,] 37.60179 -4.493936
## [344,] 37.60484 -4.501768
## [345,] 37.61362 -4.500984
## [346,] 37.63041 -4.520339
## [347,] 37.64447 -4.514527
## [348,] 37.65557 -4.515146
## [349,] 37.66773 -4.523048
## [350,] 37.67317 -4.523283
## [351,] 37.67954 -4.530967
## [352,] 37.68495 -4.531589
## [353,] 37.69476 -4.554887
## [354,] 37.71839 -4.564240
## [355,] 37.72227 -4.576107
## [356,] 37.73047 -4.575521
## [357,] 37.73399 -4.581674
## [358,] 37.74190 -4.579916
## [359,] 37.74630 -4.591051
## [360,] 37.75450 -4.604236
## [361,] 37.76212 -4.595446
## [362,] 37.78414 -4.605877
## [363,] 37.80719 -4.596873
## [364,] 37.81565 -4.584874
## [365,] 37.82454 -4.579423
## [366,] 37.83705 -4.576208
## [367,] 37.84264 -4.570336
## [368,] 37.85280 -4.579844
## [369,] 37.86159 -4.575092
## [370,] 37.87223 -4.584295
## [371,] 37.88809 -4.576124
## [372,] 37.89283 -4.581650
## [373,] 37.90214 -4.579759
## [374,] 37.91192 -4.582485
## [375,] 37.91365 -4.577197
## [376,] 37.92967 -4.573947
## [377,] 37.93358 -4.579703
## [378,] 37.93544 -4.593453
## [379,] 37.93963 -4.599411
## [380,] 37.95496 -4.594776
## [381,] 37.96682 -4.595816
## [382,] 37.98172 -4.603830
## [383,] 37.99064 -4.605029
## [384,] 37.99856 -4.611330
## [385,] 37.99903 -4.622779
## [386,] 37.99567 -4.646535
## [387,] 37.99398 -4.668825
## [388,] 37.99361 -4.708012
## [389,] 37.98736 -4.726593
## [390,] 37.98147 -4.751614
## [391,] 37.98607 -4.762101
## [392,] 37.99527 -4.769460
## [393,] 37.99748 -4.777371
## [394,] 37.99766 -4.794481
## [395,] 37.99417 -4.817846
## [396,] 37.99398 -4.833484
## [397,] 37.99969 -4.865680
## [398,] 37.99821 -4.872303
## [399,] 37.99453 -4.916642
## [400,] 37.99693 -4.940927
## [401,] 37.99674 -4.963924
## [402,] 38.00005 -4.989865
## [403,] 37.98016 -4.988922
## [404,] 37.96339 -4.978987
## [405,] 37.95625 -4.966051
## [406,] 37.94383 -4.960877
## [407,] 37.93700 -4.965741
## [408,] 37.93162 -4.963257
## [409,] 37.92417 -4.967396
## [410,] 37.91072 -4.965120
## [411,] 37.90226 -4.968138
## [412,] 37.89985 -4.975365
## [413,] 37.88826 -4.977642
## [414,] 37.88722 -4.973289
## [415,] 37.86933 -4.975666
## [416,] 37.86254 -4.979288
## [417,] 37.84839 -4.978676
## [418,] 37.83902 -4.986385
## [419,] 37.82679 -5.006664
## [420,] 37.82461 -5.020278
## [421,] 37.80474 -5.020589
## [422,] 37.79233 -5.030317
## [423,] 37.78767 -5.022348
## [424,] 37.76970 -5.013784
## [425,] 37.76529 -5.009256
## [426,] 37.73535 -5.016264
## [427,] 37.70477 -5.028857
## [428,] 37.68557 -5.039195
## [429,] 37.67744 -5.037718
## [430,] 37.62913 -5.013318
## [431,] 37.59688 -5.004935
## [432,] 37.58429 -5.004935
## [433,] 37.48989 -5.059062
## [434,] 37.48229 -5.071829
## [435,] 37.46275 -5.095832
## [436,] 37.38020 -5.193934
## [437,] 37.35897 -5.216411
## [438,] 37.38667 -5.252916
## [439,] 37.38667 -5.261727
## [440,] 37.33002 -5.449287
## [441,] 37.28895 -5.500551
## [442,] 37.26981 -5.523283
## [443,] 37.25070 -5.536397
## [444,] 37.24675 -5.549800
## [445,] 37.23877 -5.561721
## [446,] 37.23746 -5.570660
## [447,] 37.25064 -5.578907
## [448,] 37.25551 -5.584618
## [449,] 37.24923 -5.599484
## [450,] 37.25656 -5.602936
## [451,] 37.24405 -5.613802
## [452,] 37.24667 -5.618711
## [453,] 37.24224 -5.625803
## [454,] 37.23340 -5.623238
## [455,] 37.22354 -5.627709
## [456,] 37.22204 -5.642369
## [457,] 37.21825 -5.649763
## [458,] 37.20910 -5.655687
## [459,] 37.18395 -5.683050
## [460,] 37.16526 -5.716034
## [461,] 37.18772 -5.714381
## [462,] 37.20541 -5.714694
## [463,] 37.20441 -5.751857
## [464,] 37.20132 -5.748552
## [465,] 37.18567 -5.746760
## [466,] 37.16469 -5.746802
## [467,] 37.14746 -5.741227
## [468,] 37.12842 -5.758707
## [469,] 37.11630 -5.771520
## [470,] 37.10264 -5.768593
## [471,] 37.09923 -5.777239
## [472,] 37.08568 -5.786407
## [473,] 37.08022 -5.797669
## [474,] 37.06125 -5.823712
## [475,] 37.05007 -5.827823
## [476,] 37.04351 -5.841058
## [477,] 37.03657 -5.847443
## [478,] 37.03348 -5.860890
## [479,] 37.02728 -5.872364
## [480,] 37.01974 -5.878506
## [481,] 37.02699 -5.886102
## [482,] 37.02389 -5.894521
## [483,] 36.99885 -5.917656
## [484,] 36.99529 -5.913665
## [485,] 36.96399 -5.925185
## [486,] 36.95071 -5.924873
## [487,] 36.92374 -5.926827
## [488,] 36.88387 -5.945588
## [489,] 36.85404 -5.951309
## [490,] 36.82902 -5.939219
## [491,] 36.78889 -5.936069
## [492,] 36.76438 -5.937783
## [493,] 36.75467 -5.936742
## [494,] 36.73653 -5.938495
## [495,] 36.71479 -5.943593
## [496,] 36.71029 -5.922927
## [497,] 36.69708 -5.895028
## [498,] 36.66613 -5.848334
## [499,] 36.64372 -5.826237
## [500,] 36.59987 -5.797355
## [501,] 36.59591 -5.782141
## [502,] 36.58729 -5.768271
## [503,] 36.57912 -5.751337
## [504,] 36.57781 -5.743598
## [505,] 36.53359 -5.726312
## [506,] 36.52254 -5.700665
## [507,] 36.51386 -5.690972
## [508,] 36.49807 -5.686047
## [509,] 36.49033 -5.679247
## [510,] 36.47641 -5.676869
## [511,] 36.47045 -5.679097
## [512,] 36.46324 -5.671490
## [513,] 36.44834 -5.672413
## [514,] 36.43106 -5.667884
## [515,] 36.44143 -5.655924
## [516,] 36.44029 -5.636313
## [517,] 36.43340 -5.627717
## [518,] 36.42027 -5.621882
## [519,] 36.41755 -5.601725
## [520,] 36.41002 -5.599174
## [521,] 36.39220 -5.583394
## [522,] 36.37747 -5.573552
## [523,] 36.34050 -5.542578
## [524,] 36.33328 -5.538843
## [525,] 36.30413 -5.516319
## [526,] 36.28823 -5.496930
## [527,] 36.26955 -5.482589
## [528,] 36.25781 -5.462164
## [529,] 36.24641 -5.408685
## [530,] 36.28567 -5.412210
## [531,] 36.29814 -5.415632
## [532,] 36.29615 -5.362595
## [533,] 36.29367 -5.331367
## [534,] 36.29318 -5.300140
## [535,] 36.27499 -5.242317
## [536,] 36.27332 -5.230607
## [537,] 36.27779 -5.221484
## [538,] 36.29993 -5.205317
## [539,] 36.26955 -5.196999
## [540,] 36.27851 -5.179407
## [541,] 36.28975 -5.171649
## [542,] 36.29649 -5.157806
## [543,] 36.31907 -5.094663
## [544,] 36.32286 -5.078871
## [545,] 36.31663 -5.054230
## [546,] 36.31361 -5.025775
## [547,] 36.31299 -5.008369
## [548,] 36.32133 -4.990130
## [549,] 36.32313 -4.975302
## [550,] 36.32313 -4.955422
## [551,] 36.32531 -4.943153
## [552,] 36.32795 -4.912675
## [553,] 36.33721 -4.887468
## [554,] 36.33657 -4.845413
## [555,] 36.32609 -4.836474
## [556,] 36.30802 -4.812489
## [557,] 36.30415 -4.785266
## [558,] 36.30329 -4.746408
## [559,] 36.30042 -4.726293
## [560,] 36.29266 -4.697057
## [561,] 36.29621 -4.668008
## [562,] 36.28790 -4.622074
## [563,] 36.28870 -4.610512
## [564,] 36.28736 -4.587307
## [565,] 36.29621 -4.570766
## [566,] 36.30084 -4.544466
## [567,] 36.30782 -4.520210
## [568,] 36.32676 -4.499941
## [569,] 36.32643 -4.483660
## [570,] 36.32131 -4.476456
## [571,] 36.33024 -4.464697
## [572,] 36.34105 -4.440079
## [573,] 36.34537 -4.435148
## [574,] 36.29619 -4.422854
## [575,] 36.24967 -4.412554
## [576,] 36.20548 -4.407237
## [577,] 36.17624 -4.404912
## [578,] 36.14069 -4.399928
## [579,] 36.10148 -4.401589
## [580,] 36.08719 -4.398931
## [581,] 36.04898 -4.395276
## [582,] 36.02339 -4.396273
## [583,] 35.99988 -4.394679
## [584,] 35.97943 -4.380651
## [585,] 35.95904 -4.370768
## [586,] 35.94127 -4.365722
## [587,] 35.90216 -4.347849
## [588,] 35.88755 -4.343434
## [589,] 35.86496 -4.342469
## [590,] 35.85716 -4.337546
## [591,] 35.84339 -4.333236
## [592,] 35.83698 -4.324089
## [593,] 35.81774 -4.312735
## [594,] 35.81658 -4.336179
## [595,] 35.81774 -4.344064
## [596,] 35.81133 -4.360675
## [597,] 35.81700 -4.373291
## [598,] 35.81679 -4.388220
## [599,] 35.79776 -4.392741
## [600,] 35.77926 -4.399049
## [601,] 35.77474 -4.398103
## [602,] 35.76357 -4.404472
## [603,] 35.74604 -4.420172
## [604,] 35.74492 -4.432508
## [605,] 35.72270 -4.449197
## [606,] 35.71460 -4.451510
## [607,] 35.69536 -4.468121
## [608,] 35.68695 -4.472116
## [609,] 35.68285 -4.481158
## [610,] 35.66351 -4.486099
## [611,] 35.65876 -4.491651
## [612,] 35.65583 -4.506284
## [613,] 35.65163 -4.508808
## [614,] 35.65836 -4.539086
## [615,] 35.65279 -4.552438
## [616,] 35.65583 -4.562425
## [617,] 35.66435 -4.575041
## [618,] 35.66098 -4.588289
## [619,] 35.65342 -4.593965
## [620,] 35.65110 -4.608999
## [621,] 35.64269 -4.624769
## [622,] 35.62419 -4.641801
## [623,] 35.61326 -4.656309
## [624,] 35.60653 -4.671974
## [625,] 35.60822 -4.687307
## [626,] 35.59445 -4.700974
## [627,] 35.57857 -4.711803
## [628,] 35.54956 -4.729044
## [629,] 35.53548 -4.742217
## [630,] 35.52726 -4.762154
## [631,] 35.51735 -4.778879
## [632,] 35.51180 -4.792152
## [633,] 35.50592 -4.816895
## [634,] 35.48724 -4.839502
## [635,] 35.47967 -4.844263
## [636,] 35.45983 -4.847193
## [637,] 35.41589 -4.867188
## [638,] 35.40253 -4.859680
## [639,] 35.37610 -4.864319
## [640,] 35.35870 -4.856506
## [641,] 35.35010 -4.856079
## [642,] 35.34037 -4.876764
## 
## 
## 
## Slot "plotOrder":
## [1] 1
## 
## Slot "labpt":
## [1] 36.54808 -4.53372
## 
## Slot "ID":
## [1] "4"
## 
## Slot "area":
## [1] 3.78614
## 
## 
## [[6]]
## An object of class "Polygons"
## Slot "Polygons":
## [[1]]
## An object of class "Polygon"
## Slot "labpt":
## [1] 39.423146 -6.238686
## 
## Slot "area":
## [1] 0.07245558
## 
## Slot "hole":
## [1] FALSE
## 
## Slot "ringDir":
## [1] 1
## 
## Slot "coords":
##            [,1]      [,2]
##   [1,] 39.27878 -6.027963
##   [2,] 39.29502 -6.026602
##   [3,] 39.32966 -6.034940
##   [4,] 39.33859 -6.032004
##   [5,] 39.39572 -6.023934
##   [6,] 39.40121 -6.021609
##   [7,] 39.40990 -6.039812
##   [8,] 39.40838 -6.050178
##   [9,] 39.41437 -6.057343
##  [10,] 39.42333 -6.057808
##  [11,] 39.43129 -6.072347
##  [12,] 39.42584 -6.089948
##  [13,] 39.42870 -6.112995
##  [14,] 39.42546 -6.118239
##  [15,] 39.42545 -6.135899
##  [16,] 39.42861 -6.144457
##  [17,] 39.43494 -6.150328
##  [18,] 39.43799 -6.159055
##  [19,] 39.43801 -6.171122
##  [20,] 39.41981 -6.181386
##  [21,] 39.42342 -6.189269
##  [22,] 39.44435 -6.179159
##  [23,] 39.45054 -6.191441
##  [24,] 39.46148 -6.191527
##  [25,] 39.46516 -6.182103
##  [26,] 39.47961 -6.182016
##  [27,] 39.48099 -6.194641
##  [28,] 39.48984 -6.195429
##  [29,] 39.49487 -6.183844
##  [30,] 39.50340 -6.191671
##  [31,] 39.50664 -6.177672
##  [32,] 39.50346 -6.161963
##  [33,] 39.49922 -6.152047
##  [34,] 39.48969 -6.140820
##  [35,] 39.49637 -6.122608
##  [36,] 39.51079 -6.127606
##  [37,] 39.51917 -6.153461
##  [38,] 39.52822 -6.170188
##  [39,] 39.53477 -6.187206
##  [40,] 39.53575 -6.196637
##  [41,] 39.53338 -6.227418
##  [42,] 39.53649 -6.259255
##  [43,] 39.53694 -6.279485
##  [44,] 39.54477 -6.310405
##  [45,] 39.55723 -6.342903
##  [46,] 39.56547 -6.356002
##  [47,] 39.56948 -6.367438
##  [48,] 39.58026 -6.383563
##  [49,] 39.57528 -6.407509
##  [50,] 39.57070 -6.416749
##  [51,] 39.56822 -6.430035
##  [52,] 39.55466 -6.448346
##  [53,] 39.53053 -6.469330
##  [54,] 39.51603 -6.476294
##  [55,] 39.49562 -6.477160
##  [56,] 39.48760 -6.473494
##  [57,] 39.47371 -6.455829
##  [58,] 39.46571 -6.449421
##  [59,] 39.45634 -6.429154
##  [60,] 39.45565 -6.419205
##  [61,] 39.44184 -6.401707
##  [62,] 39.43411 -6.376402
##  [63,] 39.43319 -6.351902
##  [64,] 39.43078 -6.343436
##  [65,] 39.42136 -6.327594
##  [66,] 39.41158 -6.319457
##  [67,] 39.41494 -6.308694
##  [68,] 39.40787 -6.305172
##  [69,] 39.40435 -6.316413
##  [70,] 39.38646 -6.309847
##  [71,] 39.40099 -6.326545
##  [72,] 39.41546 -6.347157
##  [73,] 39.41606 -6.367958
##  [74,] 39.40995 -6.375005
##  [75,] 39.40301 -6.377186
##  [76,] 39.39851 -6.365993
##  [77,] 39.38734 -6.365165
##  [78,] 39.38579 -6.358258
##  [79,] 39.38918 -6.348141
##  [80,] 39.38337 -6.338810
##  [81,] 39.38306 -6.328763
##  [82,] 39.37382 -6.324133
##  [83,] 39.36123 -6.305649
##  [84,] 39.34744 -6.302858
##  [85,] 39.34127 -6.288876
##  [86,] 39.33780 -6.271705
##  [87,] 39.32724 -6.252795
##  [88,] 39.31797 -6.248465
##  [89,] 39.30996 -6.237057
##  [90,] 39.30686 -6.222955
##  [91,] 39.28778 -6.207119
##  [92,] 39.28505 -6.192836
##  [93,] 39.27457 -6.180707
##  [94,] 39.27866 -6.169825
##  [95,] 39.27063 -6.152037
##  [96,] 39.27192 -6.139334
##  [97,] 39.27000 -6.129695
##  [98,] 39.27406 -6.120969
##  [99,] 39.27811 -6.093694
## [100,] 39.27503 -6.086431
## [101,] 39.27642 -6.070410
## [102,] 39.28593 -6.047105
## [103,] 39.27878 -6.027963
## 
## 
## 
## Slot "plotOrder":
## [1] 1
## 
## Slot "labpt":
## [1] 39.423146 -6.238686
## 
## Slot "ID":
## [1] "5"
## 
## Slot "area":
## [1] 0.07245558
## 
## 
## 
## Slot "plotOrder":
## [1] 2 5 1 4 6 3
## 
## Slot "bbox":
##         min       max
## x 31.038017 39.855694
## y -6.976504 -1.027046
## 
## Slot "proj4string":
## CRS arguments: +proj=longlat +ellps=WGS84 +no_defs

Plotting polygons

Use addPolygons() to add to leaflet map. label = determines what will be shown when cursor hovers above area.

m <- leaflet() %>% addProviderTiles(provider = providers$Esri.WorldShadedRelief)
m %>% addPolygons(data = region_shp, label = region_shp$Region_Nam,
                  color = "black", weight = 1, fillOpacity = 0.3, opacity = 0.6)

Plotting polygons

Use highlightOptions() to highlight shapes when cursor hovers above. bringToFront = TRUE avoids potential problems with order in which shapes are coded in shape file.

m %>% addPolygons(data = region_shp, label = region_shp$Region_Nam, fillColor = "gold",
                  color = "black", weight = 1, fillOpacity = 0.3, opacity = 0.6,
                  highlightOptions = highlightOptions(color = "white", weight = 3,
                                                      bringToFront = TRUE, opacity = 1))

Plotting polygons

Possible to use addPolylines() to add outlines only to leaflet map.

m %>% addPolylines(data = region_shp, color = "red",  weight = 2, opacity = 1)

Plotting a choropleth

Choropleth: Map with areas shaded according to some numeric variable
(similar to heatmap but uses geographic boundaries)

myPal <- colorNumeric(palette = "YlOrRd", domain = region_shp$density)
m %>% addPolygons(data = region_shp, label = region_shp$Region_Nam,
                  fillColor = myPal(region_shp$density), fillOpacity = 0.7,
                  color = "white", opacity = 1, weight = 2)

Plotting a choropleth

Like before, we can log density to give a more informative map

myPal <- colorNumeric(palette = "YlOrRd", domain = log(region_shp$density))
m %>% addPolygons(data = region_shp, label = region_shp$Region_Nam,
                  fillColor = myPal(log(region_shp$density)), fillOpacity = 0.7,
                  color = "white", opacity = 1, weight = 2)

Your turn 2.2d

Adjust the choropleth code below to:

  1. use colorQuantile() instead of colorNumeric()
  2. add circles coloured by date for human cases
m <- leaflet() %>% addProviderTiles(provider = providers$Esri.WorldShadedRelief)

myPal <- colorNumeric(palette = "YlOrRd", domain = log(region_shp$density))
m %>% addPolygons(data = region_shp, label = region_shp$density,
                  fillColor = myPal(log(region_shp$density)), fillOpacity = 0.7,
                  color = "white", opacity = 1, weight = 2)

Solution 2.2d

Subset using map_data[map_data$species == "human",] or alternatively dplyr::select()

With colorQuantile(), we don't need to log density

Create a second colour palette for data with colorNumeric().

human_data <- map_data[map_data$species == "human",]
myPal <- colorQuantile(palette = "YlOrRd", domain = region_shp$density)
myPal2 <- colorNumeric(palette = "viridis", domain = human_data$date_decimal)
m %>% addPolygons(data = region_shp, label = region_shp$density,
                  fillColor = myPal(region_shp$density), fillOpacity = 0.7,
                  color = "white", opacity = 1, weight = 2) %>% 
  addCircleMarkers(data = human_data, lat = ~y, lng = ~x,
                   fillColor = myPal2(human_data$date_decimal), fillOpacity = 0.7, radius = 4,
                   stroke = T, weight = 2, color = "black", opacity = 0.8)

Solution 2.2d

human_data <- map_data[map_data$species == "human",]
myPal <- colorQuantile(palette = "YlOrRd", domain = region_shp$density)
myPal2 <- colorNumeric(palette = "viridis", domain = human_data$date_decimal)
m %>% addPolygons(data = region_shp, label = region_shp$density,
                  fillColor = myPal(region_shp$density), fillOpacity = 0.7,
                  color = "white", opacity = 1, weight = 2) %>% 
  addCircleMarkers(data = human_data, lat = ~y, lng = ~x,
                   fillColor = myPal2(human_data$date_decimal), fillOpacity = 0.7, radius = 4,
                   stroke = T, weight = 2, color = "black", opacity = 0.8)

Add labels with some html formatting

labels <- sprintf("<strong>%s</strong><br/>%g people / km<sup>2</sup>",
                   region_shp$Region_Nam, round(region_shp$density, 0)) %>%
  lapply(htmltools::HTML)

m %>% addPolygons(data = region_shp, fillColor = myPal(region_shp$density), label = labels,
                  weight = 2, opacity = 1, color = "white", fillOpacity = 0.7,
                  highlightOptions = highlightOptions(color = "black", weight = 3,
                                                      bringToFront = TRUE, opacity = 1))

Using leaflet and environmental data in raster format

Loading raster data

Load data using raster() from the raster package

density <- raster::raster("../../Day 1/data/HumanPopulation.grd")
density
## class       : RasterLayer 
## dimensions  : 259, 267, 69153  (nrow, ncol, ncell)
## resolution  : 0.041665, 0.041665  (x, y)
## extent      : 29.32649, 40.45105, -11.77259, -0.9813543  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +no_defs +ellps=WGS84 +towgs84=0,0,0 
## data source : /Users/wharvey/Documents/git/ShinyCourse/Day 1/data/HumanPopulation.grd 
## names       : TZA_popmap10adj_v2b 
## values      : 0, 29089.56  (min, max)

Plotting raster data

We can use the base plotting function plot() on the object we've created

plot(density)

Plotting raster data

Logging density will provide more texture to map

plot(log(density))

Plotting raster data with leaflet

We use colorNumeric() again, as we did to colour by date earlier

colour_pal <- c("#FFFFCC", "#41B6C4", "#0C2C84")
raster::values(density) %>% range(na.rm = T)
## [1]     0.00 29089.56
myPal <- colorNumeric(palette = colour_pal, domain = c(0, 30000), na.color = "red")

m <- leaflet() %>%
  addRasterImage(x = density, colors = myPal, opacity = 0.8)

Plotting raster data with leaflet

m

Plotting raster data with leaflet

Let's log density as we did before

raster::values(density) %>% range(na.rm = T) %>% log
## [1]     -Inf 10.27813
myPal <- colorNumeric(palette = colour_pal, domain = c(-1.5, 11),
                      na.color = "transparent")

We have to exclude some data, as there are 0 density polygons and log(0) gives -infinity

sum(raster::values(density) > exp(-1.5), na.rm = T) /
  sum(raster::values(density) >= 0, na.rm = T)
## [1] 0.9975207

Plotting raster data with leaflet

Plot the logged raster data with some tiles and a legend for the colour scheme.

m <- leaflet() %>%
  addProviderTiles(provider = providers$CartoDB.Positron) %>%
  addRasterImage(x = log(density), colors = myPal, opacity = 0.8) %>%
  addLegend(pal = myPal, values = c(-1.5, 11), opacity = 0.8,
            title = "Human<br>population<br>density")
## Warning in colors(.): Some values were outside the color scale and will be
## treated as NA

Plotting raster data with leaflet

Plotting raster data with leaflet

Instead of using addProviderTiles(provider = providers$CartoDB.Positron)

We order things here so that we plot

  1. The background tiles only (providers$CartoDB.PositronNoLabels)
  2. Then the raster data (addRasterImage())
  3. and finally the labels (providers$CartoDB.PositronOnlyLabels)
m <- leaflet() %>%
  addProviderTiles(provider = providers$CartoDB.PositronNoLabels) %>%
  addRasterImage(x = log(density), colors = myPal, opacity = 0.8) %>%
  addProviderTiles(provider = providers$CartoDB.PositronOnlyLabels) %>%
  addLegend(pal = myPal, values = c(-1.5, 11), opacity = 0.8,
            title = "Human<br>population<br>density")

Plotting raster data with leaflet

Your turn 2.2e

Adapt the code below to add region outlines that highlight when the cursor hovers an area. Use addPolygon() with fillOpacity = 0

colour_pal <- c("#FFFFCC", "#41B6C4", "#0C2C84")
myPal <- colorNumeric(palette = colour_pal, domain = c(-1.5, 11),
                      na.color = "transparent")

m <- leaflet() %>%
  addProviderTiles(provider = providers$CartoDB.PositronNoLabels) %>%
  addRasterImage(x = log(density), colors = myPal, opacity = 0.8) %>%
  addProviderTiles(provider = providers$CartoDB.PositronOnlyLabels) %>%
  addLegend(pal = myPal, values = c(-1.5, 11), opacity = 0.8,
            title = "Human<br>population<br>density")
## Warning in colors(.): Some values were outside the color scale and will be
## treated as NA

Solution 2.2e

m <- leaflet() %>%
  addProviderTiles(provider = providers$CartoDB.PositronNoLabels) %>%
  addRasterImage(x = log(density), colors = myPal, opacity = 0.8) %>%
  addProviderTiles(provider = providers$CartoDB.PositronOnlyLabels) %>%
  addLegend(pal = myPal, values = c(-1.5, 11), opacity = 0.8,
            title = "Human<br>population<br>density") %>% 
  addPolygons(data = region_shp, label = region_shp$Region_Nam, fillOpacity = 0,
              color = "black", weight = 1, opacity = 0.6,
              highlightOptions = highlightOptions(color = "white", weight = 3,
                                                  bringToFront = TRUE, opacity = 1))

Solution 2.2e